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ENFIN REEDITES ! 


Les quatre premiers 
numéros de CPC 
en un seul livre 


De nombreux 
programmes de jeux 
et utilitaires, des 
conseils pratiques, 
trucs et astuces, 
schémas, des 4 
premiers n° de CPC 
réunis en un seul 
livre. 
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à retourner à Bretagne Edit’ Presse - La Haye de Pan - 35170 BRUZ 


AMSTRAD | 
VERS UN MONOPOLE ? 


epuis 7 ans que nous sommes dans la presse, nous en avons vu de toutes sortes. De la tentative de 
rachat en passant par les pressions nombreuses et diverses, nous avons résisté seuls. Soyons honné- 
tes, pas tout à fait seuls. Notre avocat du Barreau de Rennes n’y est pas étanger. 
Nous avons toujours entendu être maîtres de nos jugements. Plutôt disparaître que se coucher sans 
se battre. 
Aujourd’hui, la société Amstrad international nous ordonne de changer l’un de nos titres. En l’occurrence AMS- 
TAR, le journal des jeunes dont le succès est évident aujourd’hui. On y parle de confusion possible que l’on peut 
faire croire qu’Amstrad participe à la Rédaction et la cautionne (les lecteurs qui suivent CPC depuis ses débuts 
savent à quoi s’en tenir sur ce sujet !). 
On y parle aussi de confusion préjudiciable à la marque. Les lecteurs apprécieront l’argumentation. 
Notre confrère Amstrad magazine, qui pourtant a négocié fort cher le titre, risque lui aussi, un jour, de se voir 
confronter à des problèmes. Un exemple ? Nous avons toujours loué sa maîtrise dans l’organisation des salons 
Amstrad expo. Il semble que désormais Amstrad France veuille reprendre à son compte cette exposition. ‘Merci 
Amstrad magazine. Vous nous avez préparé le terrain, à nous maintenant”’, telle est peut-être la pensée des diri- 
geants d’Amstrad. Dans tous les cas, le lecteur remarquera l’élégance du geste et gageons que les exposants seront 
très largement sélectionnés, si cet état d’esprit n’est pas modifié. 
Aussi avons-nous pu apprendre que la société Amstrad souhaitait mettre en place SA propre revue Amstrad-PC. 
A l’évidence, il faut faire le vide avant ! 
L'expérience passée montre que les importateurs ou fabricants qui tentèrent de lancer leur propre revue furent 
peu crédibles, tant sur le contenu que sur la publicité ! Les parutions furent souvent marginales. En agissant ainsi, 
il n’y a plus de contradicteurs. Seuls certains produits ‘‘bien pensants’’ peuvent être mis en avant. 
Ceci représente un immense danger à deux niveaux : 


— Celui de l’indépendance de la presse et de l’information déjà parfois sujettes à caution par les lecteurs. 
— Amstrad international est anglais et l’on peut craindre que les stratèges d’Outre-Manche préparent dès main- 
tenant les ouvertures du Marché commun en 1992. 


Pendant ce temps, les Français se battent sur des sujets, certes importants, mais qui ne sont pas les seuls ! 
Le Marché de l’Europe, c’est demain ! 
Espérons avec la France. 


Florence MELLET 
Sylvio FAUREZ 
Fondateurs 
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CPC-AMSTRA 


C2 LE LANGAGE MACHINE 

DE L'AMSTRAD CPC 
Plus loin que le BASIC. Des bases de la programma- 
tion en assembleur à l'utilisation des routines systè- 
me, nombreux exemples. Contient un programme 
assembleur, moniteur et désassembleur. 
Réf. ML123 — Prix : 129 F 


C1 MONTAGES, EXTENSIONS 

ET PERIPHERIQUES 

AMSTRAD CPC 
Tout ce que peut réaliser un amateur d'électronique 
avec un CPC. Interfaces, programmateur d'EPROM... 
Un très beau livre de 450 pages. 
Réf. ML 131 — Prix : 190 F 


C2 LE UVRE DU LECTEUR DE 

DISQUETTE AMSTRAD CPC 
La programmation et la gestion des données avec le 
6128, le DD-1 ou le 664 | Utile au débutant comme au 
programmeur en langage machine. Contient un listing 
du DOS commenté, un uilitaire qui ajoute les fichiers 
RELATIFS à l'AMDOS avec de nouvelles comman- 
des BASIC, un MONITEUR disque et beaucoup d'au- 
tes programmes et astuces. 
Réf. ML 127 - Prix : 149 F 


C1 LA BIBLE DU CPC 664/6128 

Tout connaltre sur les CPC 6128 et 664. Analyse du 
système d'exploitation, du processeur, le GATE AR- 
RAY, le contrôleur vidéo, le 8255, le chip sonore, les in- 
terfaces. Réf. ML 146 

Prix : 190 F 


C1 MIEUX PROGRAMMER EN ASSEMBLEUR 
Thomas Lachand-Robert 

Méthodes de programmation en assembleur Z80, ac- 

compagnées de nombreux exemples de programmes 

d'application fonctionnant sur les Amstrad CPC 464, 

664 et 6128. Réf. 0193 

Prix : 148F 


C1 TECHNIQUES DE PROGRAMMATION 

DES JEUX EN ASSEMBLEUR 

Georges Fagot-Barr ay 
Cet ouvrage contient des programmes de jeux écrits 
pour les ordinateurs Amstrad CPC 464, 664 et 6128. 
Chaque programme est accompagné d'une analyse pé- 
dagogique de la structure des phases essentielles et 
de tableaux résumant la fonction et les valeurs des 
principales variables. Réf. 208 
Prix : 96 F 


C7] GRAPHISME EN ASSEMBLEUR 

SUR AMSTRAD CPC 

F. Perot 
Programmer des applicaïons graphiques en assem- 
bleur sur Amstrad (464, 664, 6128). De nombreuses 
rouines. Prix : 145 F 


C2] AMSTRAD EN MUSIQUE 

D. LEMAHIEU 
Pour les amateurs déjà initiés au langage BASIC, 
traduction d'œuvres musicales sur Amstrad (464, 
664, 6128). Partant de la génération de sons, en pas- 
sant par le synthétiseur musical programmable. 
Prix : 165 F. 


RSX ET ROUTINES 

ASSEMBLEUR SUR AMSTRAD 

D. ROY et J.J. WEYER 

De très nombreux programmes de graphismes et de 
mathémalques permettront aux possesseurs d'Ams- 
trad (464, 664, 6128) d'améliorer leurs connaissances 
en assembleur Z80. Prix : 200 F 


C7] MIEUX PROGRAMMER SUR AMSTRAD 
Michel ARCHAMBAULT 

Complément pratique du manuel d'origine. L'art de con- 

cevoir et de créer un programme d'une manière effica- 

ce. Multiples astuces. Explique dairement certains 

points obscurs du manuel d'origine. Prix : 85 F 


C7 PROGRAMMES UTILITAIRES 

POUR AMSTRAD 

Michel ARCHAMBAULT 
Nombreuses routnes : utilitaires de programmation, 
Uâlitaires graphiques, la gestion de fichiers, utilitaires 
imprimantes. Prix : 85 F. 


C2 APPRENEZ 

L'ELECTRONQUE SUR AMSTRAD 

P. BEAURILS & B. DESPERRIER 
Programmes permettant de visualiser les phénomènes 
complexes de l'électronique. Prix : 95 F 


C7 COMMUNIQUEZ AVEC AMSTRAD 

D. BONOMO 8 E. DUTERTRE 

Pour tous les passionnés d'ondes courtes, codage, dé- 
codage, réception/émission, interfaces. Prix : 90 F 


C1 UNVERS DU PCW 

Patrick LEON 
Environnement matériel, commande de CPM 3.0, le 
BDOS, le BIOS, fichiers binaires, éditeur de disquet- 
tes, désassembleur Z80, graphismes, caractère à la 
loupe. Prix : 119 F 


Nouveau ! 
C7] COMPILATION CPC n° 1-2.34 
Pix :70F 


C7 MS-DOS PAS À PAS 

(version 2 et 4) 

A. PINAU 
Apprendre les commandes du système d'exploitation 
MS-DOS en les pratiquant, tel est le but de cet 
ouwage. Réf. 382 - Prix : 135 F 


C_] PC, MODEMS ET SERVEURS 

A. MARIATTE 
Apprend aux utilisateurs averis d'IBM-PC/XT/AT à 
se servir d'un modem, à utiliser ou créer un logiciel de 
communication, à lout savoir sur les réseaux téléma- 
tiques. Prix : 210 F 


C1] INTRODUCTION A dBASE Hi 

Alan SIMPSON 
Pemmet au lecteur même débutant d'apprendre la pro- 
grammation sans difficulté, en réalisant les exemples 
proposés. Réf. 0131 — Prix : 210 F 


BIEN DEBUTER SUR PC 
Vous apprendrez bout d'abord à connaître votre nou- 
veau matériel (écran, davier, unité centrale...), puis à 


utiliser le DOS et toutes ses commandes. Une initia- 
fon complète au BASIC. Réf. ML 183 — Prix : 149 F 


[1 GEM SUR AMSTRAD PC 

K. LANG 
Constitue une découverte complète et progressive de 
GEM : GEM Paint, GEM Write, GEM Graph, GEM 
Wordchart Prix : 185 F 


LE LIVRE DE FRAMEWORK 

R. COHEN 

Le talbeur, le gestionnaire de fichiers, le générateur de 
graphiques, l'accès DOS, le logiciel de communication 
et FRED : le langage évolué. Indique aussi la manière 
de reker le PC au monde extérieur. Prix : 150 F 


8068 ASSEMBLEUR IBM PC 

ET COMPATIBLES 

H. ULEN 

Regroupe trois livres en un seul : 

Un cours d'initation, un manuel de l'utilisateur, un gui- 
de pratique. Réf. : 121 — Prix : 250 F 


C7] 8088 et ses PERIPHERIQUES 

H. LILEN 
Ce livre est consacré aux microprocesseurs 8088 et 
8086 et à leur principaux circuits périphériques d'ac- 
compagnement, tels qu'ils sont employés dans les 
micro-ordinateurs PC d'IBM et compaïbles. 
Réf. 68 — Prix 150 F 


PRATIQUE DES IBM (Il) 

ENCYCLOPEDIE BASIC 

H. ULEN 

Encyclopédie BASIC à double accès traitant la pro- 
grammañon avancée, les fichiers, le graphique et la 
couleur, ainsi que la musique etles sons. Indispensable 
pour éviter les recherches fastidieuses et les pertes 
de temps. Réf. 165 — Prix : 220 F 


DU BASIC AU TURBO PASCAL 

Comment développer sous Turbo des routines corres- 
pondant à des programmes BASIC. 

Réf. ML 186 — Prix : 190 F 


CLEFS POUR PC ET COMPATIBLES 

D. MARTIN, G. HERZET & P. JADOUL 
Indispensable au programmeur pour accéder rapide- 
ment à toutes les informañons. 

Réf. P37 — Prix : 195 F 


ECRIRE EN dBASE N et M 
C. MCHEL 


Apprendre à développer en dBASE des applications 
structurées avec des menus, des saisies de données, 
des traitements, des rapports. 

Réf. P43 - Prix : 185 F 


DICTIONNAIRE DU BASIC IBM 

D-A LIEN 

C'est la référence de base du langage BASIC Micro- 
soft (PC et compañbles). 

Réf. P80 — Prix : 195 F 


Nouveau ! 

PRATIQUE DES IMPRIMANTES 

Michel ARCHAMBAULT 

Apprendra aux amateurs comme aux professionnels 


Total commande : 

Port 10 % : 

Total de mon règlement : 
Date: 


Signature : 


à résoudre les mille et un problèmes qu'ils ne manque- 
ront pas de rencontrer lors de la mise en service de 
leur imprimante. 

Prix :95 F 


LES SECRETS DU MINITEL 

C. TAVERNIER 

Principaux chapitres : 

Les différents services proposés sur Télétel : 

— Informatique domestique et Minitel, téléphonie et 
transmission d'informations, différents principes de 
transformation de données, comment devenir serveur. 
Réf. 487 — Prix : 115 F 


[7] SYSTEMES D'EXPLOITATION 

ET LOGICIEL DE BASE 

P. JOUVELOT & LE CONTE DES FLORIS 
Moniteurs et systèmes d'exploitation mono-täche : 
CP/M, MS-DOS ; systèmes d'exploitation multi-tà- 
ches ; les couches d'un système d'exploitation ; Unix : 
présentalion et analyse ; les utilitaires : gestion de fi- 
chiers, assembleurs, éditeurs de liens. 
Réf. 482 — Prix : 95 F 


CONSTRUISEZ VOS ALIMENTATIONS 

J.-C. ROUSSEZ 

Schémas échelle 1 : transformateur, redressement, 
filtrage, dissipation de chaleur, alimentations non 
régulées, multplicateurs de tension, alimentations 
régulées, alimentations à découpage. 

Réf. 463 — Prix : 70 F 


C7] INITIATION BASIC (niveau 1) 

H. LILEN 
Le BASIC 7. Mais c'est rès simple | Ce livre vous 
en convaincra comme il a déja convaincu les dizaines 
de milliers de lecteurs qui en ont fait le “bestseller* de 
la micro-informalique. Réf. 52 - Prix : 125 F 


INITIATION BASIC (niveau 2) 

Programmation structurée 

F. CROCHET & D. VILAIN 

Cette représentation originale, véritable synoptique 
de l'application, accessible à tous, même aux débu- 
tants, vous permet de réaliser des programmes par- 
fatement structurés. Une grande parie est consa- 
crée à la gestion des fichiers BASIC à accès séquen- 
Sel direct ou séquentiel indexé. Réf. 158 — Prix : 160 F 


C7 INMATION AUX FICHIERS BASIC 

J. BENARD 
Avec ce livre, vous découvrirez progressivement le 
"mécanisme" de la consätution d'un fichier en BASIC 
Microsoft, puis de son exploitation. 
Réf, 189 — Prix : 115 F 


1 INTRODUCTION AU TURBO PASCAL 
Douglas STIVISON 

Cet ouvrage permetta à l'utilisateur d'exploiter la 

puissance exceplonnelle de ce langage. 

Réf. 0180 — Prix : 196 F 


PROGRAMMER EN PASCAL 

D. DAVID & J.-L DESCHAMPS 

Vous trouverez ici toutes les nolons nécessaires à la 
programmalion en Pascal. Sont également étudiés le 
Pascal UCSD et le Turbo Pascal. 

Prix :115F 
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ACTUALITÉS 


SECURITE INFORMATIQUE 


Les entreprises utilisatrices de 

systèmes informatisés doivent 

parfois faire face à de lourdes per- 
tes dues à un sinistre informatique d'or- 
dre matériel ou immatériel. 
Le Salon Infosec devant se dérouler les 
2, 3 et 4 juin prochains réunira 150 
exposants qui contribuent, chacun dans 
leur domaine, à la sécurité des systèmes 
informatiques. En plus des stands, les 
personnes intéressées pourront suivre 
des sessions de formation présentant les 
méthodes et moyens concrets à mettre 
en œuvre pour assurer la sécurité d'un 
ensemble informatique. 
Lieu de ce salon INFOSEC 87 : Palais des 
Congrès, Porte-Maillot, 75017 PARIS. 


ENSEIGNEMENT ASSISTE 
PAR ORDINATEUR 


Quel est l'avenir de l'informatique 
à l'école ? Des entreprises en 
plein essor ont misé sur ce sec- 
teur de l'informatique que représente 
l'EAO (Enseignement Assisté par Ordina- 
teur) et se sont unies pour réaliser un fas- 
cicule proposant une sélection de logi- 
ciels, de livres, de revues et de matériel 
informatique pour l'EAO. 
IDEES s'adresse tout particulièrement 
aux écoles, associations et parents d'élè- 
ves. Si vous voulez vous le procurer, il 
suffit de le demander à l'adresse suivante 
en joignant 2 timbres à 2,20 F pour les 
frais d'envoi : 
Editions SORACOM 
La Haïe de Pan 
35170 BRUZ 


AMSTRAD RECOMPENSE 


Cette année, Amstrad a été 

sélectionnée pour recevoir le tro- 

phée ‘’Tertiel"” et ce pour la per- 
formance de son micro-ordinateur… 
Il faut savoir que le trophée ‘‘Tertiel'" a 
pour objectif de mettre en valeur des pro- 
duits qui sont d'incontestables réussites 
et Amstrad l’a prouvé en 1986 en deve- 
nant le numéro un de l'informatique 
domestique. 


TROPHEE DE 
L'INFORMATION 1987 


Du 7 au 10 mai derniers, s'est 

déroulé la Coupe de l'Informati- 

que organisée par l'AFIN (Asso- 
ciation Française des informaticiens). 
Pour cette compétition, 85 bateaux 
étaient présents parmi lesquels l'équi- 
page d'Omnilogie Citizen qui effectuait 
là sa première opération de sponsoring... 
Opération fort réussie puisqu'il a non 
seulement remporté le trophée de l'infor- 
matique 1987, mais également la Coupe 
du Yacht Club de France pour sa victoire 
dans le parcours olympique. 


SOFTSTRIP COMMUNIQUE 


Softstrip ou ‘’La Révolution infor- 
matique sur papier'” nous indique 
leur changement de locaux. Voici 

leur nouvelle adresse : 

SOFTSTRIP FRANCE 

7, rue de la Gare 

92130 Issy-les-Moulineaux 

Tél. : (1) 40.95.16.66. 


AVIS AUX EDITEURS 


La société ESAT Software com- 
munique aux auteurs et éditeurs 
de programmes qu'elle tient à leur 
disposition une série de protections 
physiques ou logiques sur Amstrad, 
CPC... 
Pour plus de renseignements, téléphonez 
au : 56.96.35.25. 


PROFESSIONS LIBERALES 
ET INFORMATIQUE 


Vous exercez une profession libé- 
rale et vous voudriez adapter un 
programme de gestion sur votre 
CPC. 
GESTION FINANCIERE est un pro- 
gramme associé à la gestion de cabinet 
dentaire qui est adaptable à toutes les 
professions libérales ; de plus, il répond 
aux conditions spécifiées par les associa- 
tions de gestion agréées de contrôle des 
déclarations fiscales. 
Pour plus de renseignements, contactez 
Paul Parage-Jonjon au 94.29.59.06. 


L'INFORMATIQUE POUR 0 F 


Micro & Soft Informatique offre 

des Ateliers ‘’Open Access" gra- 

tuitement aux entrepreneurs qui 
veulent avoir une gestion performante en 
attendant d'investir en équipement infor- 
matique. Ils peuvent ainsi utiliser des 
logiciels professionnels de comptabilité, 
de gestion de stock et facturation, des 
bases de données, des tableurs… 
Pour tout contact : 
MSI (tél. 56.94.50.94). 


NOUVELLES ASSOCIATIONS 


Club informatique 

Siège social : Foyer rural de Puyricard — 
Centre de formation X2000 — Ancienne 
école — 13540 Puyricard. 


Club informatique 
Siège social : Cité informatique — 9, rue 
Florent — 69008 Lyon. 


Club informatique 
Siège social : avenue George-Sand — 
36140 Aigurande. 


Club micro-informatique de Rivarennes 
Siège social : mairie — Rivarennes — 
37190 Azay-le-Rideau. 


Club informatique d’'Andernay 
Siège social : mairie — Andernay — 
55800 Revigny-sur-Ornain. 


Club nano-ordinateurs 
Siège social : 13, rue Thouin — 75005 
Paris. 


Association informatique 

de Clermont-Dessous 

Siège social : Fourtic — mairie — 
Clermont-Dessous — 47130 Port- 
Sainte-Marie. 


Club informatique varennois 
Siège social : mairie — 03150 Varennes- 
sur-Allier. 


Club informatique de l'océan Indien 
Siège social : Télémac — 14, rue d'AI- 
sace — 97400 Saint-Denis. 


Club informatique de Thézy-Glimont 
Siège social : mairie — Thézy-Glimont — 
80110 Moreuil. 


Microclub informatique nîimois 
Siège social : chez M. Bendinelli (Eric) — 
16, rue de Vérone — 30000 Nîmes. 


ACTUALITÉS 


Comme chaque mois, nous vous présen- 
tons la liste des nouveaux jeux annon- 
cés pour la gamme Amstrad. Certains 
seront sans doute commercialisés lors- 
que vous lirez ces lignes et nous vous en 
présenterons un banc d'essai dans un 
prochain numéro d'Amstar ou de CPC. 


COKTEL VISION 


De l'aventure et de l’action en 

compagnie de Jolly Jumper et de 

son fidèle Lucky Luke (ou l'in- 
verse, peut-être ?), NITROGLYCERINE 
est composé de cinq épisodes d’un style 
très varié où vous pourrez alternative- 
ment avoir votre part d'aventure, votre 
part d'action, sans oublier votre part de 
réflexion. 


Avec ROBINSON CRUSOE, plongez dans 
ce que l'on peut appeler un roman animé. 
Ce style vous permet de vivre l'aventure 
en prenant les décisions nécessaires à 
votre survie, en vous immisçant dans les 
paysages, en relisant des passages de 
textes. Tout ceci vous permet de pren- 
dre connaissance par le jeu de romans 
classiques. 


ERE INFORMATIQUE 


L'été arrive bientôt avec les 
vacances à la clé. Ere informa- 
tique y a pensé et a donc décidé 


de sortir le premier numéro d'une com- 
pilation de son catalogue. Elle comprend 
trois programmes à l'ambiance estivale 
qui sont : Macadam Bumper, Pacific et 
Mission 2. Les numéros 2 et 3 sont déjà 
prévus et sortiront respectivement en 
septembre et novembre prochains. 

CPC : cassette, 150 F ; disquette, 230 F. 


CONVERSION' 


Popular Computing Weekly 


AMSTRADE/SCHNEID 


ACTIVISION 


Avec ENDURORACER, affrontez 

sur votre moto toutes les difficul- 

tés du monde !.. Vous passerez 
ainsi des pistes goudronnées à celles très 
éprouvantes du désert. A noter qu'il est 
possible de jouer à 2 avec ce logiciel. 
CPC : cassette, 95 ; disquette, 145F. 


Avec ACADEMY, vous vivez tout 

simplement la suite de Tauceté. 

Dans ce logiciel, Gal Corp décide 
de fonder une école de formation pour 
pilotes d'élite. Si vous voulez devenir un 
as de l’Académie, vous devrez mener à 
bien pas moins de 20 missions en com- 
battant à bord d'un Skimmer militaire 
d'avant-garde. 


FIL 


Il faut croire que l’arrivée de la fin 

du premier semestre favorise 

l'apparition des compilations 
puisque FIL nous en propose une à son 
tour avec Pack Amstrad qui regroupe les 
4 logiciels suivants : Révolution, The 
Great Escape, Cauldron Il et Sorcery. 
CPC : cassette, 149 F ; disquette, 195F. 


ENGLISH SOFTWARE 


Avec LEVIATHAN, vous avez 

entre les mains un jeu classique 

dans l'espace où il est aussi 
important d'avoir un vaisseau de manie- 
ment très souple que de réussir à survi- 
vre. Vous devez naviguer dans trois 
zones différentes et affronter dix sortes 
d'ennemis.. Alors, bon courage ! 


RESTE, 01 


INFOGRAMES 


Vous avez intérêt à vous entraî- 

ner tout l'été aux longues balades 

en montagne car, dès septembre, 
vous essaierez de planter votre fanion, 
par tous les temps, de jour comme de 
nuit, sur le sommet de votre choix et ce 
grâce au logiciel BIVOUAC. Ainsi, vous 
vous mesurerez aux plus hautes âmes du 
monde... 


ANTI-ERREURS 


Grégory NOE 


Il est difficile de taper un programme 
d'une revue sans commettre d'erreurs |! 
Quand les erreurs sont signalées (Syntax 
error in, Line does not exist in...) la cor- 
rection est facile puisque la ligne est indi- 
quée, mais lorsqu'au ‘‘’point de vue’ du 
CPC le programme est correct, il peut en 
être tout autrement pour le lecteur : 

Si le fonctionnement du programme ne 
correspond pas vraiment au programme 
original, alors il est impossible de retrou- 
ver l'erreur commise, à moins de com- 
parer les lignes de votre programme avec 


CPC - 


"compatibles PC”. 


D CPC AMSTRAD 
(em) 


[ Abonnement essai 
D AMSTAR 


NOM 


REVUE DES UTILISATEURS D'AMSTRAD : 
chez vous votre revue. Vous bénéficierez de réduction sur certains produits et vous recevrez gra- 
tuitement 1 n° hors série tous les deux mois. 
AMSTAR : en avant première, toutes les nouveautés sur AMSTRAD -— des programmes, des arti- 
cles ! A la demande de nos lecteurs, nous prenons désormais les abonnements. 

PCompatibles MAGAZINE : la référence en matière d'initiation et de perfectionnement sur les 


D PCompatibles Magazine 


celles du journal mais c'est très long et 
on risque de passer sur une erreur sans 
la voir. 

C'est pourquoi ce programme a été 
créé ; il est à utiliser si vous ne retrou- 
vez pas Vos erreurs. 

La frappe d’un programme de votre jour- 
nal favori (CPC) terminée, vous faites 
‘’'RUN’’, et là vous corrigez toutes les 
erreurs signalées par le CPC en vous 
référant au journal pour comparer. Si 
malgré cela, il ne tourne toujours pas sui- 
vez cette procédure : 


Attention, tous nos abonnés recoivent avant parution des souscriptions sur les nouveaux livres ! 


180F 
105F 
55F 
100F 
200 F 


11 numéros 
6 numéros 
3 numéros 

11 numéros 

11 numéros 


Prénom 


Adresse 


Code postal 


en vous abonnant, 


Service Abonnement 
BP 11 — 35170 BRUZ 


— sauvez votre programme en ASCII 
grâce à l'instruction : Save'’nom. 
prog'',A 

Puis, si vous êtes sur K7 rebobinez la 
bande jusqu’au début du fichier ; 

— chargez Anti-Erreurs ; 

— entrez le nom de votre programme et 
insérez le support où il se trouve (K7 ou 
disquette). 

Après quelques secondes les numéros de 
lignes vont défiler. Vous remarquerez 
qu'à chaque ligne correspond un code de 
2 lettres sous cette forme : >XX<, 
c'est ce code qui va vous permettre de 
savoir d'où proviennent les erreurs. Pour 
cela il faut que vous compariez les codes 
du journal à ceux de l'écran. Si un code 
diffère, notez sur papier le numéro de 
ligne qui correspond à ce code. Conti- 
nuez ainsi jusqu'à la fin du listage. 

Le défilement terminé, rechargez votre 
programme et corrigez les lignes que 
vous avez notées en comparant avec le 
journal. Faites ‘’ RUN” et, oh !, miracle !, 
ça marche. 

Attention : lors de la frappe du pro- 
gramme à traiter, n'omettez aucun 
caractère (sauf les espaces) car Anti- 
Erreurs les prend en compte, et bien sûr 
ne tapez pas les codes de contrôle. A 
partir du mois prochain, tous les listings 
de CPC comporteront ces codes, ce qui 
devrait remédier une fois pour toutes aux 
problèmes de saisie. 

NB. la ligne 480 contient le numéro de 
canal O pour l'écran ou 8 pour l'impri- 
mante. 


vous recevrez 


A renvoyer à 
SORACOM 


Ville 


Date 


Signature 


Merci d'écrire en majuscules. Ci-joint un chèque libellé à l'ordre de : Editions SORACOM. \ 
Retournez le(s) bulletin(s) ou une photocopie. 


CPC 


LOU RE HE HE DE PE HE HE HE 6 HE EH EH 6 He 


ZE ‘4 # 
HE ‘+ NTI — ERREURS % 
46 # # 
O0 AE A OM CH HO HO HR EE 
EE 

F4 CO)CPFEC & GREGOKY NOE 1987 
86 

96 ON ERKOR GOTO 966 


136 MODE 
116 DIM ggC2E 


126 FOR Ieë TO 22:READ g$:g#8(l)=qœ: 

NE XT 

136 ATTENTION LA LIGNE DE DATA CI 

DESSOUS NE CONTIENT FA4S TOUTES LES 
LETTRES DE L'ALFHA-BET 111 


146 DATA A,B,C,D.E,F,G.H,J,E.L,M,N, 

FLAG R, TU, VW, X, Y,Z 

156 SNTI-BUG FICHIER 

164 IF FÉERCHIMEM+1)2255 THEN 216 
174 OFENOUT "cpc" - 
189 MEMORY HIMEM-S 

196 CLOSEOUT 

206 FOFE HIMEM+1 

#1 DEFINT A-727 

CRC 

236 BORDER 6: INE G,12INE 1, 16: FEN 1! 
:FAFER & 

248 MOVE 6,16: DRAW 656,16 

239 FRINT TAB(27) "ANTI-ERR | 

E UK SG" . 

264 MOVE 6,285: DRAW 656,785 

274 LOCATE 18,2$:FRINT'CFC REVUE DU 
STANDARD AMSTRAD ET SCHNEIDER" 

284 WINDOW 1,86,2,25 

294 mé="Realise par Gregory NOE" 

FOOD fan 

316 FOR ii TO LEN(m#) 

226 f$=f#h+MIDSE Cm, i, 1) 

LOCATE 76-1,S:FRINT #$ 


MEL 
CR See) 


RENE 


246 FOR tel TO 166 

259 NEXT E,i 

566 

CRT EN UM DE DEMO DE DEEE DE DÉ DE DEEE DE DE DEEE EN 

286 | 
29e LOCATE €, 1: FRINT'ENTREZ LE NOM | 


DU FICHIER : 
496 INPUT MUQNFS 
419 LOCATE 3,%:FRINT'TANT QUE LE LI. 
STAGE N'EST FAS TERMINE" 
45e LOCATE €,S:FRINT'NE FAS 
KR LE MAGNETOFHONE OÙ NE" 
456 LOCATE Z,7:FRINT'FAS SORTIR LA 
DISQUETTE" 

44 LOCATE 2,16: FRINT"'FRESSEZ 
OUCHE FOUR LA LECTURE" 


Un 
0] 


ARRETE 


UNE T 


| 786 


| 846 


856 CALL SEBOZ:FRINT TAB(56) 


| MiNFS#s LL 


| 9% 


456 CALL REBRES 
488 OFENIN "it+tnéts 


476 CLS: FRINT'TRAITEMENT EN COURS... 


486 cart CANAL DE SORTIE 
498 LINE INFUT#K9,b$:a$=UFFERS (b#) 


566 IF cat*8 THEN GOSUE 916 

519 IF INÉEY(66)=@ THEN STOF 

526 : 

S3@ CALCUL DE LA CLE DE CONTROLE 
54@ ; | 


JO az 
366 FOR i=1 TO LEN(as) 
74 lE=MID#(a, i,1) 
S96 IF 1#=CHRS CES) THEN 666 
J99 ara+ASC(l+#) 
666% NEXT à 
&1n ceINT(a/235) 
26 pra-(cxa2T) 
26 CH=GE(F) 
&46 azt 


65% FOR ii TO 6 

b6A 1H=MIDE(at, i,1) 

678 IF 1$<"@" OR 1#+"9" THEN 766 
| 686 lit=lit+lé:ama+VALl(1$) 


| 69 NEXT 


76% cÆINT(a/27) 


| 716 pra-(cx27) 


7264 CéeCS+66 (F3 


EE 
FAR IF cai:8 THEN 7564 ELSE 77% 
796 FRINT li$s; TAB(IG) USING MEAkEt"s 
c$ 
764 lig='"":GOTO 846 
778 114="" PRINT#Ca, LEFTS(b#,26)3T 


ABCE2) USING "r\\aticé 

IF LEN(b#H)<E6 THEN 846 

796 fg=i 

866 b$=MIDS (b$,21,LEN(b#)) 

819 FRINT#ca,LEFT#(b$,26) 

26 IF fag=i AND cat:8 THEN fg=0:609 
UE 916:G0T0 86 

56 GOTO 786 

IF EOF=-1 THEN CLOSEIN ELSE GOT 
O0 49% 

"UNE T 
OUCHE. ..":CALL &BEÈ6S 

864 CLS: FRINT'MAINTENANT RECHARGEZ 

ET CORRIGEZ LES LIGNES QUE 

VOUS AVEZ NOTEES.." 

87% END 

889 ‘TRAITEMENTS 
896 


DES ERREURS 


IF ERRE=2S THEN CLS:FRINT CHRS# (C7 
3 CHRS (24); "FICHIER NON ASCII": CHRS# 
(24) : END ELSE CONT 

916 com=comt+i:IiF com:19 THEN CALL & 
EBOS: FRINT TAB(SG) "UNE TOUCHE..." 
CALL SEB6GS: COM=1 

929 KETURN@ 


CRO 


Jean-Pierre PETIT est directeur de recherche au CNRS. Il est 


l'auteur d'un logiciel de CAO de 120 Ko intitulé AMSTRAD 3D, 
assorti d'un livre du même nom, édité par PSI. Le logiciel a été 
délibérément mis dans le domaine public, c'est-à-dire que vous 
pouvez le copier sur une disquette AMSTRAD-CPC en toute 
tranquillité chez un revendeur ou un ami. Le livre est un gros mode 
d'emploi du logiciel, pour non-programmeur. 


Mais ce programme est riche de ficelles de programmation, liées à 


l'imagerie 3D. Dans cette suite d'articles, Jean-Pierre PETIT 
explique au lecteur toutes ses astuces, ce qui lui permettra peut- 
être de construire lul-même son propre programme de CAO. 


INTRODUCTION 


Dans les trois articles précédents, 
nous avons commencé par préciser la 
structure de données, puis la techni- 
que de programmation (SPLITING), 
puis nous avons construit un MODE- 
LEUR minimal qui nous permet de créer 
des objets. Nous pourrions poursuivre 
dans cette optique d'engendrement 
d'objets, mais le lecteur se sentirait 
frustré en disant "Quand est-ce que je 
vais voir enfin une image sur mon 
écran ?”. 


Jean-Pierre PETIT 


Nous allons donc créer ici un program- 
me minimal de dessin 3D. Ceci corres- 
pond à la section DES de la chaîne de 
traitement d'AMSTRAD-3D et va nous 
permettre d'expliciter la technique du 
SPLITING décrite dans l'article 2. 

Reprenons notre modeleur MOD1 tel 
que nous l'avions laissé en fin d'arti- 
cle 3 et modifions légèrement le début, 


PROGRAMME 
DE TRACE 
D'IMAGES 3D 


ENRICHISSEMENT DE LA 
CHAINE DE TRAITEMENT 
PAR SPLITING 


Listing 1 


La ligne 7 se réfère au choix des cou- 
leurs. Nous traiterons de ceci plus loin. 
Nous ajouterons donc à MOD1 la suite 
d'instructions : 


— 


Figure 1a 


de l'axe de visée 


Figure 1 


a 
trace sur l'écran 


comme suit. Voir listing 1 
= 
Point objet 
P 
p 
Point image 2 
Le) 
© 
DT P 
© 
Axe de visée Ê | 
A , Bécart angulaire 


Figure 1b 


Ce faisant, lorsque nous le lancerons, 
nous verrons apparaître : 


Choix des couleurs : 


0-Noir 1-Bleu 
2-Bleu vif  3-Rouge 
4-Magenta  5-Mauve 
6-Rouge vif  7-Pourpre 
8-Magenta vif  9-Vert 
10-Turquoise  11-Bleu ciel 
12-Jaune  13-Blanc 
14-Bleu pastel  15-Orange 
16-Rose  17-Magenta pastel 
18-Vert vif  19-Vert marin 
20-Turquoise vif  21-Vert citron 
22-Vertpastel 23-Turquoise pastel 
24-Jaune vif 25-Jaune pastel 


26-Blanc brillant 
Couleur du fond ( Bleu par défaut ) : 


A vous de choisir la couleur du fond, 
puis celle du stylo (26 pour le fond et zé- 
ro pour le stylo donneront uñ dessin en 
noir sur fond blanc, bien contrasté) 
avec lequel seront effectués les des- 
sins, puis’celles des axes de coodon- 
nées et du quadrillage (qui seront utili- 
sés ultérieurement pour les saisies 
écran). Vous savez que le CPC dispo- 
se de quatre pots de peinture que l'on 
peut remplir à l'aide de 27 couleurs de 
base. On aura ensuite : 


MENU PRINCIPAL 


a-Creer un objet 
b-Compléter un objet 
c-Stocker un objet 
d-Charger un objet 
e- 

{- 

g- 

h- 

j- 

Ë 

k- 

I-Créer une image 


p- 
q-Quitter 


Votre choix : 

En face de la lettre | nous avons figuré 
l'option supplémentaire de constitution 
de l'image écran. Lorsque nous appelle- 
rons cette option (l est la douzième let- 
tre de l'alphabet), la ligne 220 opèrera 
un chaïînage en destination de DES, 
qu'il nous reste à écrire. 

Pour qu'il y ait "transparence" il faudra 


+ 


Figure 2a Figure 2b 
Figure 2 


que le MENU soit identique et DES com- 
mencera par : 


LA SECTION DESSIN 


Voir listing 1 


— 


LE SOUS-PROGRAMME 
DE SAISIE DE POINT DE VUE 


Il va nous falloir maintenant créer ce 
sous-programme 27000 et ceux qu'il ap- 
pellera. Dans le programme DES 
d'AMSTRAD-3D, on peut soit dessiner 
un objet unique, soit créer une image à 
partir d'un BLQC D'OBJETS (voir struc- 
ture de bloc dans l'article 1). Ici, nous 
n'allons évidemment pas envisager tou- 
tes ces possibilités d'emblée, mais 
nous laisserons le sous-menu tel quel 
pour montrer que ces possibilités exis- 
tent et nous réserver la possibilité de 
modifier ces sections dans les leçons 
suivantes. 


Voir listing 2 


Figure 3a 


Figure 3 


à 
Le 


Figure 3b 


Ici, on est intervenu sur la ligne 230 de 
dispatching. Il n'y aura que deux sous- 
programmes réels, le 5000 (charger un 
objet) et le 27000 (dessin 3D). Les au- 
tres options seront soit des sous- 
programmes non existants, soit ce que 
nous avions appelé dans l'article 2, des 
sous-programmes virtuels. On écrira : 
Voir listing 1 

La plupart des lignes citées plus haut 
seront prélevées dans le programme 
MOD1 de la leçon précédente (lignes 
5000-5999, lignes 65000-65535). 

Si vous attaquez les options a ,bet c, 
la ligne 220 vous enverra automatique- 
ment sur MOD1 par chaînage. 


Pressez <Return> 


Figure 4 


— 


Z 


7 


X observateur 


Figure 5 


centre de 
gravité objet 


Commentaire : 

Le sous-programme 27000 commence 
par proposer trois types de dessins 
mais, tel quel, il n'en donnera qu'un 
seul : celui d'un objet déja présent en 
mémoire. || propose ensuite deux types 
de saisie du point de vue, mais ne 
donnera que la saisie au clavier. 

Les questions sont assez claires. On 
est “assis” quelque part dans l'espace 
et on vise un point. Le programme de- 
mandera successivement les coordon- 
nées de l'observateur et celle du point 
‘visé (si possible, essayez de ne pas 
‘donner le même point, sinon l'AMS- 
‘TRAD ne saura plus où il en est). 

‘On demande alors de définir l'ouverture 
angulaire (la valeur standard étant 20°). 
Ceci sera expliqué plus loin. 

Dans le sous-programme 7000, on cal- 
culera les "paramètres de visée” puis, 
en 12000, on créera l'image. 


Voir listing 2 


La ligne 12005 fera réagir l'ordinateur si 
vous tentez de lui faire calculer l'image 
d'un objet non présent en mémoire cen- 
trale. Le reste est évident. 


Voir listing 2 
LA VISEE POLAIRE 


Qu'est-ce que créer une image à partir 
d'un objet ? C'est effectuer une projec- 
tion polaire sur une surfaca-écran, à 
partir d'un point qui est censé être l'œil 
de l'observateur. Pour nous, cet écran 
sera sphérique. Si vous voulez, c'est 
notre "sphère céleste”. Les objets ponc- 
tuels sont comme des étoiles dans le 
ciel. Nous joignons notre œil à celles-ci 
et cette droite coupe une sphère de ré- 
férence, centrée sur l'œil, en un point. 

On sait qu'un point de la sphère peut 
être repéré à l'aide de coordonnées 
Sphériques. Habituellement, on parle 
d'azimut et de site, mais ici nous allons 
repérer notre point image dans un sys- 
tème différent. Sur la figure 1, on a si- 
tué l'œil au centre de la “sphère céles- 
te”. 


L'axe de la visée coupe cette sphère 
en a. Le point joignant l'œil et le point 
objet P coupe la sphère céleste en p. 
Ce point est repéré à l'aide de deux an- 
gles. Le premier est l'angle de dévers A 
et l'autre l'écart angulaire B. 

Pourquoi un tel système ? Tout simple- 
ment parce qu'il se rapproche plus de la 
visée réelle qu'on fait avec son œil ou 
avec un appareil photographique. Ima- 
ginez-vous assis sur le poste de tir 


12 


d'un canon anti-aérien. À quoi ressem- 
ble votre viseur, à ceci ou à cela ? 


La figure 2a correspondrait à un repéra- 
ge selon l'azimut et le site. La figure 2b 
est plus proche de la technique présen- 
tée ici. L 

Pourquoi cette variante ? Tout simple- 
ment parce que cette méthode permet 
de réaliser des images "fish-eye”. La li- 
mite du champ visuel "fish-eye” corres- 
pond à un écart angulaire, à une ouver- 
ture de 180°. 

L'écran de l'ordinateur n'est pas une 
sphère. Comment passerons-nous de 
cette image sphérique à un ‘point 
écran” de coordonnées (XE, YE) ? 

Le point a, matérialisant l'axe de visée, 
sera automatiquement identifié avec le 
centre de l'écran. On figurera alors une 
droite imaginaire partant du centre de 
l'écran et faisant avec "l'horizontale- 
écran” l'angle de dévers. Puis, on por- 
tera sur cette droite imaginaire une lon- 
gueur proportionnelle à "l'écart angulai- 
re”, autrement dit, on passera des coor- 
données sphériques particulières à une 
simple coordonnée polaire, sur l'écran. 
Des cercles d'égal écart angulaire, par 
rapport à la direction de visée, se tradui- 
raient par des cercles concentriques 
sur l'écran. 

Dans la figure 3, l'ouverture angulaire 
donne la limite du champ visuel as- 
similé à un cône. L'œil humain corres- 
pond grosso-modo à un cône de demi- 
angle au sommet 20°. Un angle plus fai- 
ble correspond à un "télé-objectif” et un 
angle plus grand à un “grand angulaire" 
(dépassant les capacités de l'œil 
humain). 

Le détail de ce programme est donné 
en annexe. Pour maniaques des mathé- 
matiques. 


UN CONSEIL EN PASSANT 


Je vous propose la chose suivante. 
Commencez par taper votre programme 
de dessin DES en omettant les séquen- 
ces (7000-7999), (15000-15999) et en 
remplaçant le programme 27000 par la 
suite : 


27000 REM CREER UNE IMAGE 

27001 CLS : PRINT "Simulation sous- 
programme 27000" : GOSUB 65020 
27999 RETURN 


Vous simulerez ainsi la présence de 
ces sous-programmes. Cela vous per- 
mettra de vérifier dans un premier 
temps que votre SPLITING fonctionne 
bien et que vous basculerez sans pro- 


blème de MOD1 à DES et vice-versa. 
Ceci fait, vous taperez les séquences 
manquantes en remplaçant le sous- 
programme 27000 par la véritable sé- 
quence. 


CREATION D'UNE IMAGE 


Nous n'avons en mémoire qu'un cube, 
à moins que depuis vous ayiez créer 
d'autres objets à votre convenance. 
Pour créer une image, vous ferez 
RUN"MOD1 (vous savez que DES n'est 
pas le point d'accès de la chaîne de trai- 
tement). Vous choisirez alors vos cou- 
leurs de fond et de trait (plus les cou- 
leurs de quadrillage et d'axes, qui servi- 
ront plus tard). Vous chargerez alors 
l'objet CUBE à travers l'option 


d-Charger un objet 


Puis vous attaquerez 1-Créer une ima- 
ge 


Vous verrez apparaître : 
REPRESENTER UN OBJET 

a-Objet en memoire 

b-Dessin par éléments 

c-Dessin par bloc 

Votre choix : 


Pressez la touche <a>. Vient alors : 


a-Saisie point de vue clavier 
b-Saisie écran 


Choisissez <a>. Puis prenez la sé- 
quence : 


Coordonnées observateur : 
X=7?74 

Y=73 

Z=?2 

Coordonnées point de visée : 


XG=?70 

YG=?0 

ZG=?0 

Ouverture angulaire 

20 Degrés par défaut ? 22 

Vous obtiendrez le dessin de la figure 4 
CONCLUSION 

Nous voilà avec une section program- 


me (MOD1) permettant d'engendrer des 
objets et une autre (DES) permettant 


Figure 6 


M (observateur) 


de produire des images sur l'écran. 
Nous allons pouvoir travailler sur cette 
base là et faire énormément de choses 
dont vous n'avez peut-être pas la moin- 
dre idée, parce qu'AMSTRAD-3D est 


Figure 7 


conçu comme le sont les logiciels des 
gros systèmes. Vous vous apercevrez 
vite que ce qui limitera ce logiciel c'est 
tout simplement la capacité d'affichage 
écran | 

L'AMSTRAD a, en effet, une matrice de 
points assez serrée. Hélas, la "visu" 
est un "bas de gamme” et les "pixels" 
sont assez flous. Rien à voir avec un 
écran de MACINTOSH. Mais là n'est 
pas la question. Cet ordinateur et ce 
programme splité nous permettront d'il- 
lustrer n'importe quel concept de CAO, 
y compris tout ce qui tourne autour de 
l'élimination des parties cachées, qui, 
en fin de cycle, n'aura plus de secrets 
pour vous. 

Dans les leçons suivantes, nous pour- 


Pressez <Return> 


Figure 8 


rons soit reprendre une section déja 
existante comme MOD1 ou DES et y in- 
corporer de nouveaux sous-program- 
mes, soit en créer carrément une autre, 
comme par exemple MO2, etc. 

Lorsque nous voudrons créer une 
nouvelle section, nous irons prélever 
dans l'une de celles qui existent déja 
des éléments communs, comme l'affi- 
chage du MENU général, par exemple, 
ainsi que certaines "sections à tout fai- 
re”, comme charger un objet, c'est-à- 
dire (5000-5999). Supposons que ce 
prélèvement soit effectué dans MOD1. 
Nous chargerons MOD\1, puis nous dé- 
truirons tout ce que nous ne souhai- 
tons pas garder. Nous sauverons ceci 
par un SAVE"P, par exemple. 

D'autres séquences d'instructions pour- 
ront ensuite être prélevées dans d'au- 
tres sections, comme par exemple 
DES. Supposons que dans DES la sé- 
quence 62000-62999 nous intéresse. 
Nous chargerons DES et nous isole- 
rons cette séquence en faisant succes- 
sivement : 


DELETE 1-61999 
DELETE 63000-65535 


Nous sauverons ceci en faisant par 
exemple SAVE "RAB .Nous pourrons 
adjoindre ceci à P en faisant : 


LOAD "P 
MERGE "RAB 


Si par hasard il y avait des lignes possé- 
dant le même numéro, rappelez-vous 
alors que le second programme serait 
"prioritaire" sur le premier chargé. 


ANNEXE : COMMENTAIRE 
DES SOUS-PROGRAMMES 
7000 ET 15000 


+ Sous-programme 7000 : 

On commence par calculer les coordon- 
nées du vecteur MG ( ligne 7090). Puis, 
on calcule l'azimut TE et l'angle de site 
KI de ce vecteur par rapport au trièdre 
de référence XYZ. Voir figure 4. 


Les lignes qui suivent servent à complè- 


ter ce calcul lorsque le vecteur MG est 
dans une position particulière : vertica- 
le, etc. et que la ligne 7160 conduirait à 
un message d'erreur. 

On calcule ensuite, dans le système de 
coordonnées XYZ, les composantes 
des vecteurs unitaires U, V, W portés 
par le système d'axes GU, GV, GW liés 
à l'observateur. GU est dans l'axe de vi- 
sée, GV est horizontal, GW complète 
ce trièdre trirectangle. Voir figure 5. 


+ Sous-programme 15000 : 


A partir d'un point objet P de coordon- 
nées XT(I,J), YT(I,J), ZT(I,J) on calcule 
dans le référentiel XYZ les coordon- 
nées XL, YL,ZL du vecteur GP. Puis, on 
projette ce vecteur sur le système 
d'axes : ( GU,GV,GW ), ce qui donne 
les coordonnées ( XA, YA, ZA ). 


On va ensuite calculer les angles A et 
B qui correspondent à la visée polaire 
définie plus haut. 


Les précautions prises font que le cal- 
cul pourra être effectué quelle que soit 
la position relative du point objet vis-à- 
vis de l'observateur. On pourra ainsi se 
placer éventuellement dans les objets. 
Vous pourrez vous en assurer en pre- 


nant dans le dessin du CUBE les coor- 
données ci-après : 


Observateur : 
X=0.5 
Y=0.5 
Z=0.5 


Point visé : 

X=0 

Y=0 

Z=0 

Ouverture angulaire 20 degrés. 


Vous obtiendrez alors l'image repré- 
sentée en figure 8. 


où vous reconnaitrez, bien entendu, le 
coin du cube situé sur l'origine des coor- 
données. 


Sur les figures 7 et 9, on identifie l'an- 


LISTING 1 


1 KEM MODI 15 Mars 87 
(Frogramme F5) 
3 IF FD=1 THEN 256 
E FDeds Le - 1:° Initialiser 
L (L+i chaines dans objet ) 


4 DIM XT(49,12),YT(49,12),2T (4 
DIT) NCA): REM etc... 

7 GOSUR 24666: REM Choix des 
couleurs 

14 CLS 

15 FRINT'MENU PRINCIPAL": FRINT | 


26 FRINT'a-Creer un objet" 

26 FRINT'"'b-Completer un objet" 
49 FRINT'c-Stocker un objet" 
59 FRINT'"'d-Charger un objet" 
66 FRINT'e- "3: PRINT !E£- "Us FRINT!"g 
ts PRINT "ht: PRINT" i- Us FRINT "3j 
ts PRINTOE-" 

76 FRINT “l-Creer une image" 
96 FRINT “'m- tt: FRINT ns FRINT "Oo 
ts FRINT Up" 

189 FRINT'aq-Quitter" 

195 IF EL$ <% "" THEN LOCATE € 
2,21: FRINT"Objet resident":LOC 


ATE 2%,23:PFRINT ELS$ 

197 IF L£r-1 THEN LOCATE ŒS1,2S 
2 PRINT L+is" ch." 

266 GOSUR 45466: REM Saisie 
caractere 

219 IF C=17 THEN END 


226 IF C = 12 THEN CHAIN"FA4 
226 ON C GOSUR 9666,9016,86006 
, 5006: REM etc.... 

999 ERA, "#4. bak!":GOTO 14:REM 
EQucle MENU 

5996 REM Chargement objet 
5919 INFUT'Nom de l'objet 
# 

54206 OFENIN EL 
INFUT#9,L:REM L'objet a 


“SEL 


SOS 


14 


gle A (angle de dévers) et l'angle B 
(écart angulaire). Le point figurant la tra- 
ce de l'axe de visée a les coordonnées 
écran (313,200). Le point image a les 
coordonnées écran (XE,YE). Les li- 
gnes 15260 et 15270 permettent le tra- 


automatique sur l'AMSTRAD. 


(L+1) chaines 

59526 FOR 1=6 TO L : REM Four 
toutes les chaines allant de 6 
a L 

5646 INPUT #9,NCI): KREM Nombre 
de segments sur chaine 

5956 FOR J=6 TO NCI):REM Pour 
tous les points de la chaine 
d'indice I 

3666 INFUT 
2ZTCI,J) 
3976 NEXT JiNEXT I 

36894 CLOSEIN 

3999 RETURN 

8466 KEM Stockage objet 
8616 INFUT'Nom de l'objet 
$ 

STE RTS) 


#O,XTCI,JI,YT(CI,J), 


"SEL 


OFENQOUT EL 

SOS FRINT #9,L:REM L'objet a 
(N+1) chaines 

8936 FOR I=@ TO Li: 
toutes les 

& a L 

B446 FRINT #9,N(I):REM Nombre 

de segments sur chaine 

8956 FOR J=a TO NCI): KEM Four 
tous les points de la chaine 

d'indice I 


REM Four 
chaines allant de 


86460 FRINT #9,XTOCIT,J),YT(CI, .J) 
sZT(I,J) 

867% NEXT J:NEXT TI 

8684 CLOSEOUT 

8999 RETURN 

9@%6 KREM CREER UN OBJET 

9665 Le-lskek+lsELS CH) = ELS= 
9614 CLS: FRINT'CREER UN OBJET" 
: FRINT 

9920 FRINT'a-Creer chaine par 
chaine" . 
9956 FRINT'"'b-0bjet de revoluti 
on" 


964% FKRINT'c-Travailler 
objet standard 
9654 FRINT'd-Creer un prisme" 


SUR UM 


9664 FKRINT'e-Creer 


un cercle" 


9974 FKRINT'"'#f-Creer 
ercle" 


un arc de c 


cé de la chaîne. S'il s'agit du premier 
point (J = 0), on positionne à l'aide d'un 
PLOT, pour les points suivants, il y au- 
ra tracé du segment à l'aide d'un 
DRAW. Le fenêtrage, Dieu merci, est 


>DJ< 


# DH 


#XF< 
#KEQ< 
FAR 


SJT< 


9696 GOSUR 65966: REM Saisie 


caractere 

9166 IF C:7 OK C =-51 THEN 999 
9 

9192 IF Ci THEN 9466 

9116 ON C GOSUR 2660664: REM, 
etc... 


9999 KETURN 
24666 CLS: FRINT'"'Choix 
eurs'': FRINT 
24916 FRINT" 


des coul 


3-Noir 


i-Bleu" 

24626 FRINT'" 2-EBleu vif 
3-KRouge" 

24926 FRINT" 4-Magenta 
3-Mauve" 


24646 FRINT" 
7-Fourpre" 

24056 FRINT" 
9-Vert" 

24466 FRINT'"19-Turquoise 
1i-Bleu ciel" 

24970 FRINT"12-Jaune 
13-Blanc" 

24084 FRINT'"14-EBleu pastel 
15-0range" 

24996 FRINT'"16-Kose 
17-Magenta pastel" 

24166 FRINT"18-Vert vif 
19-Vert marin" 

24116 FRINT'"'26-Turquoise vif 
21-Vert citron“ 

24126 FRINT'228-Vert pastel 
23-Turquoise pastel" 

24156 FRINT'24-Jaune vif 
23-Jaune pastel" 

24146 FRINT"26-Rlanc brillant" 

: FRINT: INFUT'"Couleur du fond(B 

leu par defaut)"3;CFS# 

24145 IF CFE THEN INE 6, VA 

L(cfH): FAFER 6& 

24156 FRINT:FRINT: INFUT'"Couleu 

r du stylo(Jaune par defaut) " 

SE 

24164 IF CSg<rmn 

L(CS#):FEN 1 

24176 FRINT:INFUT'Couleur axes 


&-Rouge vif 


8-Magenta vif 


THEN INK 1, VA 


"sa CAS 
24186 IF CASE: "" THEN INE Z, VA 
L (CAS) 
24199 FRINT:INFUT'"Couleur quad 
rillage ";CQ# 
24366 IF CQ$::"" THEN INF 2, VA 
L(CQ#) 


24999 RETURN 

24664 REM CREER DES CHAINES AU 
CLAVIER 

26616 IF L=49 THEN FRINT'"Trop 


» VE 


de chaines,desole...":GOSUR 65 


A206:G0OTO0 26999 

20824 LeL+i: REM Incrementer 
effectif de chaines 

Z6OHES CLS: FRINT'SAISIE CHAINE 
S AU CLAVIER": FRINT 


26456 INFUT'"'Nombre de segments 
"sNCL): 
BOAES IF N(L)+12 THEN FRINT "1 


2 segments maxi 
26: GOTO 26425 


I" 1 GOSUER 459 


264464 FOR J=® TD NL): KEM Bou 
cle de saisie de coordonnees p 
oint 

26459 FRINT'Foint numero "as J+i 

2666464 INFUT'XT=" 3; XT(L, TJ) 

26474 INFUT'YTE"SYT(L, J) 

26684 INFUT!"'ZT="s2TCL, JT): 

26494 NEXT J 

26196 FKRINT'" Une 

erreur "se GOSUE 656426: 1IF C = 1 

3 THEN 26625 : 

26156 FRINT'" Une autre 
chaine *'":GOSUE 65926: IF C = 
15 THEN 266416 

26999 KETURN 

835466 REM Saisie caractere 

65416 PRINT: FRINT "Votre choix 

635024 CH=INEEYS:IF Ce" THEN 

65426 

85454 CrASC (CH) 

654464 IF Créé THEN CeC-96:GOTO 
65525 


LOE£ THEN 


: mu à s 
63545 IF % 70 [RL 


65525 RETURN 


sd sh 4) 


C=Gr64 


LISTING 2 


1 REM DES 16 Mars 97 
(€ Frogramme F4 ) 

S IF FD=i THEN 256 

à SOUND 1,26: CLS:FRINT'Fas d'° 

acces direct a DES'":FRINT:FRIN 

T'Je vous renvois sur MODI,.,.," 

: RUNMFE 

19 CLS 

15 FRINT'MENU FRINCIFAL "3: PRINT 


24 FRINT'a-Creer un objet" 


#MN< 


#DNE 


“ER 


#WC< 
2MF< 


36 PFARINT'"'b-Completer un objet" 


46 FRINT'c-Stocker un objet" 
39 FRINT'"'d-Charger un objet" 
66 FRINT'e- "ts PRINTU£- Us FRINT "ag 
es PRINT he Ce PRINT "it: FRINT" 3j 
ms PKRINT'E-" 

74% FRINT “"“1-Creer une image" 
86 FRINT mette FRINT nt: FRINT!"o 
es PRINT pe 

184 PRINT '!"'g-Quitter" 

195$ IF EL <% MU THEN LOCATE 2 
Sels FRINT'"'Objet resident": LOC 


ATE ES, SE: FRINT ELS 

197 IF L£r-1 THEN LOCATE Œ1,27% NU: 
sÉRINT Læls" chi" 

198 LOCATE 1,22 RUES 
206 GOSUER 65006: REM Saisie + BC< 
caractere 

&1@ IF Ce17 THEN END FD: 
226 IF Cil OK Cr17 THEN 16 WE: 
2e IF © # 16 THEN GOSUER 17666 VYK: 
:GO0TO 16 : 

#56 ON C GOSUR 44600, 446006, &4 LF: 
HO, 5000, LABO, 60006, HAE, 6: 
HO, LOHHDA, 60H00, 60006, 27000, 66 

(RISTS] 

46 ERA, "a, BAE" ÉPAËE 
99% GOTO 16 FGE< 
3966 REM Chargement objet FFE 
3416 INFUT'Nom de l'objet MEL TG 
Es 

3426 OFENIN EL EME 
3625 INFUT#HS,L:REM L'objet UNE 
a (L+1) chaines 

JO FOR Ieë TO L : REM Four t %DJ« 
outes les chaines allant de & 

a L 

3646 INFUT #9,NCI): REM Nombre DK: 
de segments sur chaine 

29836 FOR Je TO NCI):REM Four + FLE 
tous les points de la chaine d 
‘indice I 

9666 INPUT #9, XTCT,J) ,YT(I,J), AM: 
2ZTCI,J) 

3976 NEXT Je:NEXT I NN 
3456 CLOSEIN sUF< 

3999 RETURN FQK< 
7646 REM CALCUL FARAMETRES VIS 5VH£ 
TON 

7496 CX = KG — XM 2 CY = YG —  ZVT: 
VM 3 CZ = 26 — ZW 

71% DD = SOQR (CXA#CX + CY#CY ) HE): 

7116 IF DD = & AND CZ x &@ THEN JE 
TE = &@ 3 EI = FI / ? : GOTO 7 

216 

7126 IF DD = & AND CZ © © THEN :GL: 


16 


TE = @ 3 KI =-PI / 2 : GOTO 7 
216 
7134 ET = ATN (CZ/DD) s CM 
7146 IF CX = @6 AND CY *% © THEN :FN< 
TE = FI/2 : GOTO 7216 
7154 IF CX = &@ AND CY £ © THEN MF: 
TE =-FI/2 : GOTO 7216 
7166 TE = ATN (CY/CX) :FQ< 
7176 IF CX © @ AND CY % © THEN BK 
TE = FI + TE 
7186 IF CX © © AND CY + @ THEN “AT: 
TE & FI + TE 
7196 IF COX < © AND CY = © THEN FU 
TE = FT 
7266 IF CX = &@ AND CY <# © THEN SEK 
TE = - FI/E 
7216 KEM #TLe 
FEZ6 REM #UM< 
7254 CT = COS (TE) 3: ST = SIN  ANE 
(TE) 
7246 CE = COS CHI) 2 SE = SIN  WF< 
CET) 
7256 XU = CEACT 3 YU = CEXST 2: #JQ< 
ZU=SF 
7268 XV = — ST 5 YV = CT 4 24 TRE 
æ 
7276 XW = -— GSEXCT 23 YW = -— SEX HT: 
ST + ZW = CK 
7999 RETURN + TM 
12666 KEM Objet deja present # QD + 
en memoire 
126065 IF Le-1 THEN CLS: FRINTOEF %AJT« 
as d'objet en memoire, eh, far 
ceur !'eSOUND 1,56 FOR TTei T 
Ü 1666: NEXT TT : GOTO 16 
12626 FOR I = 6 TO Los FOR J = NF: 
& TO NCI):REM FOUR TOUTES LES 
CHAINES ET TOUS LES FOINTS DE 
CES CHAINES 
12456 GOSUE 15606: REM TRACE PIE 
IMAGE ECRAN 
12644 NEXT JI:NEXT I EH 
12999 RETURN FQH< 
15666 Calcul et trace image *KG< 
1564 XL=XTCI,J)-XM # CL 
15456 YLæeYTO(I,J)-YM + GM< 
1596 ZLæZT(I,J)-ZM # LAN 
156964 XA=XLXXU+YLXxYU+ZLXxZU #WRE 
15166 YA=XLEXV+YLEYU+ZLAZV RH 
15116 ZA=XL#XW+YLXYW+ZLXZW FXJE 
135121 IF XA=6 AND YA=®G AND ZA TL 
G THEN ZA=D. 601 
15122 KO = SOQR(YAXYA+ZAKZA) EM 
15125 IF XA=6 THEN B=96:GOTO 1 *EQ< 
3127 
15126 EB=ATNCRO/XA):EH=Bx1806/PI  SVRE 
15127 IF XA:6 THEN E=E+1896 #VT< 
195126 IF YA=6 AND ZA=G THEN À= “QL: 


9: GOTO 15186 


15146 IF ZA=6 AND YA :@ THEN À 
=-—-0Q6s GOTO 15186 

1515 IF ZA=G AND YA<6 
96: GOTO 15186 

15164 Az-ATN(YA/ZA) : AsA#xISO/PFI 


THEN À= 


15176 IF ZA<G AND YA +6 THEN & 
=Â-186 
15172 IF ZA 
#A+186 
15174 IF ZA 
=186 

15186 X=BKkGINCA#FI/1864):Y=EH#xC0 
S(A#FI/1686) 

19246 XERTTLE+X#260/AN:REM CODR 
DONNEES ECRAN 

152956 YE=LO64+Y*266/AN 

15266 IF J=6 THEN FLOT XE,YE 


46 AND YASG THEN À 


46 AND YA =G THEN 


19276 IF J£50 THEN DRAW XE,YE, 
1,9 


15999 RETURN 
27006 REM REFPRESENTER UN OBJET 


27645 CLS 

27414 FRINT'REPRESENTER UN OEJ 
ET: FRINT 

27626 FRINT:FRINT!"'a-0Obijet en m 
emoire" 

27456 FRINT"b-Dessin par eleme 
nts!" 

276046 FRINT'c-Dessin par bloc" 
s FRINT 

27054 GOSUE 645466 : FRINT : CD 
es REM STOCÉAGE TYFE DE DESSIN 


27169 CLS : PRINT''a-Saisie poi 

nt de vue au clavier" 

27176 FRINT'b-Saisie ecran ":F 

HINT:GOSUR 654600: CSAISIEZC:REM 
STOCEAGE TYFE DE SAISIE 
27196 FKRINT:FARINT!"Coordonnees 
observateur 2": FRINT 

27264 INFUT'Xæ": XM 

27216 INFUT'Yæt!tsYM 

27226 INPUT "Ze": 2m: FRINT 

27256 FRINT'Coordonnees point 


vise ss FRINT 

27244 INFUT'XG= "3: XG 

27294 INFUT'YG="3YG 

272664 INFUT'Z26Gs="3 26: FRINT 


27276 PRINT'Ouverture angulair 

ou 

27286 INFUT"20 degres par defa 

Ut "ss ANS 

272685 IF ANg="" 

.…. GOTO 27556 
27294 AN=VAL CANY) 


THEN AN = 


26 3 


MAUES 


5 MM£ 
#GN< 
sNF< 
5 JQ< 
FMRE 
# QT 
:NU< 
#RVE 
“WW 
TEE 


>JX< 


27:56 CLS s: GOSUE 
CUL FARAMETRES DE 
27:64 GOSUER 172646: 
N IMAGE DE L'OBJET EN MEMOIRE 
27274 SOUND 1,56 : LOCATE 
FRINT'PFressez “Returns: GOSUE 
3026: REM SIGNALE LA FIN DL] 
TRACE 
27998 
27999 
PANSIETETS. 
encore existants 

6664 1e CLS FRINT"'Sous-program 


VISEE 


CD=& : 


me non encore Cre8,.. ": GÜSUE 6 

LS OS) 

549909 RETURN Ul 
&464e REM FASSAGE SUR MODI #2LE 
64999 CHAIN'UFE RQ 
65964 RKEM Saisie caractere MM 
63416 PRINT: FRINT "Votre choix  #JNE 
GATE CHEINÉEYS: IF Ce THEN EF 
ie Et 


6586 
65446 IF 
65535 
65456 IF C:96 
63SES RETURN 


C+96 THEN CeC-®é: GOTO 


à 
2 
LE 


e, 
es 
LATE 


1 L2À 
ÿ 


/ 


Une ligne téléphonique 
est à votre disposition, 
vous mettant en contact 
direct avec la rédaction. Ceci 
est un service sans égal pour tous 
vos problèmes d'ordre TECHNI- 
QUE ! Respectez simplement les 
horaires et les jours que nous vous 
indiquons : 

MERCREDI de 9h00 à 12h00 et 
de 14h00 à 17h00. 


ù F 
MA 
VENDREDI de 9h00 à 12h00 seu- GX 44 SE 
lement. 7. _ AP) 
Tout appel en dehors de ces cré- # à 
neaux sera refoulé : ne dépensez 


pas inutilement votre argent ! » = 
Le numéro : “Ù 


99.52.98.11 a 


ATTENTION ! Pour vos problèmes 
| d'abonnements ou de commandes, 
appelez en dehors de ces créneaux. 


2? 


ÈS 


7806:REM CAL >QU« 
REM CREATIO TV< 


1,1: CW< 


RETURN UE 
REM S0us-programmes nom ‘LG 


CeASC(C#) #20: 


THEN CeC-é64 #YTE 


17 
17 


2 


Bernard POISOT 


LE GENERATEUR DE BRUIT ET 
QUELQUES VALEURS INTERESSANTES 


LE GENERATEUR DE BRUIT 


Il existe dans SOUND une dernière 
option, la période de bruit, prenant les 
valeurs O à 31. Cela génère un bruit pas 
très agréable qui se superpose au son 
défini précédemment. Ce bruit permet 
essentiellement de créer des effets spé- 
ciaux, en procédant ainsi : le son émis 
est haché par une fréquence qui se cal- 
cule en divisant 62500 par la période 
BASIC de bruit. Si la période de bruit est 
à O, le bruit est arrêté. On peut fixer la 
période sonore à O pour n’entendre que 
le bruit. 

I n'y a qu'un générateur de bruit qui sera 
le même pour les trois canaux et sa 
période sera définie par le dernier ordre 
pris en compte. 


19 ‘ essai sonore stereo 
£9 d=r0sf= 

59 FÜR 1=0 TO 19 

49 SOUND 1 

59 NEXT 


Le programme qui suit donne un exem- 
ple de ces effets. Il imite une locomotive 
passant devant vous à ‘toute vapeur" 
avec un effet de relief stéréo afin de 
simuler le mouvement de la gauche vers 
la droite qui ne sera, bien sûr, perçu 
qu'avec une installation stéréo. En voici 
le principe. 

Le train arrive de la gauche et se rappro- 
che : lignes 30-50. 

L'oreille droite commence aussi à enten- 
dre le bruit à partir d'un certain rappro- 
chement, niais moins fort lignes 
70-100. 


Quand le train est devant nous, les deux 
oreilles reçoivent la même intensité 
sonore, le volume est maxi : fin de la 
boucle en 100, début de la boucle en 


(locomotive) 


SAQUSSUEF FNbhruitziss 


& IF S(1){r4 THEN 40 


70 FÜR i=ii TO 15 


NOEFUIT 


30 ZSOUND 4sfrdr2#(i-i0) ss FNbruit 


S0 ZSOUND lrfsdroisssr 
190 NEXT 
119 FÜR I=15 TO 11 


SHÉPSE 


129 SOUND 4: fodsrsirrFNbruit 


SOUND Lsrfrds5#(i-10)+::FNDruit 


STEP-1 


179 

140 NEXT 

139 FÜR I=i9 Ti à r: 
140 SOUND 4srfodrissrFNbruit 


179 MNEXT@ 


18 


110. Il s'éloigne ensuite à droite. À une 
certaine distance, l'oreille gauche ne per- 
çoit plus rien : boucle 110-140. 

Le son continue à décroître à droite, 
jusqu'au silence : lignes 150-170. 


Les paramètres qui déterminent le bruit 
ont été regroupés à la ligne 20 : d pour 
la durée, f pour la fréquence de base et 
FNbruit pour le bruit superposé. Essayez 
diverses modifications, mais ne jouez 
que sur un paramètre à la fois. Vous 
entendrez l'effet des diverses valeurs. 
Conservez ce programme. || vous servira 
en sous-programme pour utiliser des 
effets stéréo dans vos œuvres. Suppri- 
mez la ligne 20 et renumérotez-le en 
10000 par exemple. Vous déterminerez 
dans votre programme la valeur des 
paramètres en fonction des effets 
voulus. 


QUELQUES VALEURS 
INTERESSANTES 


L'envoi du code 7,PRINT CHR$(7) pro- 
voque un bip qui vide les canaux sono- 
res, arrêtant tout son en cours. Cela peut 
se faire aussi en provoquant une erreur, 
par exemple en utilisant la touche DEL 
en début de ligne, ce qui génèrera le 
même bip. 

La période BASIC 142 génère le LA des 
musiciens, sa fréquence est 440 Hz. 
La période sonore à O permet d'obtenir 
le bruit seul. 

Si l'on fixe à O la durée de la note, c'est 
l'enveloppe de volume qui déterminera 
la durée du son. Si cette durée a une 
valeur négative, l'enveloppe de volume 
sera répétée le nombre de fois spécifié. 
Bien que le volume ne puisse prendre que 
les valeurs O à 15, la variation imposée 
par ENV va de -128 à 127. Ceci aura l'ef- 
fet suivant : si le son dépasse 15, il 


revient à O, de même s'il doit descendre 
à une valeur négative, il remontera à par- 
tir de O. 

Si la durée du pas dans une section 
d'ENV est O, elle vaut 256, soit 
2,56 secondes. 

Un numéro d'enveloppe négatif pour 
ENT répètera l'enveloppe jusqu'à la fin 
de la note. 

L'explication des possibilités du son en 
BASIC est terminée. 

Essayez diverses combinaisons que 
votre CP peut engendrer, d'abord simple- 
ment sans ENV ni ENT et complétez petit 
à petit. 

Vous entendrez de tout : bruits et sons, 
agréables et affreux. Il ne tient plus qu'à 
vous et à votre patience d'éveiller le 
Jean-Michel Jarre qui sommeille en vous. 


AMIS DU LOTO 


ne gaspillez plus votre mise ! 


Jouez “malin” avec 
LOTO-INFORMATIC 


Le programme d'analyses, 
de sélections et 
de combinaisons de jeux 
dont vous rêviez pour mettre 
le maximum de chance 
de gagner de votre côté 


DOC + CADEAU TRES UTILE 
pour la confection de vos 
grilles contre 4 timbres à : 


INFORMATIC Applications 
BP N°78 - 67800 BISCHEIM 


M. Mme 
Adresse 


TOUT SUR SOUND 
amstradistes 


Malins les amstradistes, ils ont enfin trouvé le logiciel de leur 
rêve! 

Vous aussi adoptez le logiciel SÉRIE.2 et découvrez vite la 
COMMUNICATION SANS FRONTIÈRE... 


Pour moins de 1.000 F vous pouvez désormais vous 
connecter directement sur le réseau téléphonique et trans- 
mettre vos fichiers, programmes, CAO, DAO en toute fiabilité. 
Avec SÉRIE.2, il n'est plus nécessaire d'être un crack en infor- 
matique pour enregistrer, archiver, imprimer, les pages écran 
de votre minitel afin de les consulter HORS CONNEXION ceest- 
à-dire : GRATUITEMENT. 


Avec le câble spécial SÉRIE.2 reliez votre ordinateur à votre 
minitel et vous avez immédiatement accès à vos banques de 
données favorites. SERIE.2 UNE UTILISATION SIMPLE POUR 
DES APPLICATIONS MULTIPLES... 


Avec SÉRIE.2 exploitez aussiles 2 millions d'adresses profes- 
sionnelles de l'annuaire électronique pour créer vos fichiers 
et les récupérer dans les divers progiciels existants ou 
encore éditer des étiquettes adresses pour vos mailings. 


SÉRIE.2 UNE EFFICACITÉ MAXIMUM POUR UN COÛT 
MINIMUM. 

SÉRIE.2 vous ne trouverez pas moins cher ailleurs. 
SÉRIE.2 

e Version PC1512 

990 F TIC. 

e Version CPC 464 + DDI, CPC664, CPC 6128, PCW 8256, 
PCW 8512 (nécessite un interface série RS 232 C). 

690 F TIC. 
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SÉRIE.2 est en vente à la al 


AVEC SÉRIE.2 : "TÉLÉCOMMUNIQUEZ MALIN !" 


Pour tout complément d'information, retournez ce coupon à : 


.JMN DIFFUSION 
LES CLÉMATITES 38410 URIAGE 
Permanence téléphonique : 78 27 97 90 


Code postal 


IMPLICATION & CS LYON 194 49 887 / IMPRIME EN FRANCE 


AGENDOR 


DE QUARTZ SYSTEM 


Noël LAGNEU 


AGENDOR est la dernière nouveauté de QUARTZ SYSTEM, auteur et 
éditeur par ailleurs de programmes utilitaires dont nous avons sou- 
vent parlé dans ces lignes (les applications graphiques CRISTAL, les 
gestions de fichiers SAPHIR, la tenue de comptes RUBIS....). 


Ce nouveau programme pour PCW est 
d'une veine tout à fait inédite : il est 
capable de fonctionner en arrière-plan, 
comme certains utilitaires pour PC tels 
que SIDEKICK de BORLAND. Expliquons- 
nous :'le programme est chargé dans une 
zone mémoire qui est ensuite protégée 
contre l'écriture par une astuce software. 
Le lancement est obtenu par une com- 
binaison des touches du clavier. Pour 
SIDEKICK par exemple, il faut appuyer 
sur les deux touches SHIFT latérales. 
Pour AGENDOR, la combinaison de lan- 
cement choisie est celle obtenue par 
appui sur ALT, SHIFT et > simultané- 
ment. En sortant de ce programme, le 
système d'exploitation reprend la main. 
On peut alors naturellement relancer l'ap- 
plication par lamême manœuvre ou lan- 
cer n'importe quel autre programme. Ce 
qui est tout à fait impressionnant est 
que, dans le contexte obtenu, il est 
encore possible de lancer l'utilitaire en 
arrière-plan, par la même combinaison de 
touches, et également de revenir à l'au- 
tre programme lancé sous CP/M sans 
modifier son bon fonctionnement ulté- 
rieur, ce qui-est tout à fait extraordi- 
naire !.. Dommage que LOCOSCRIPT 
soit exclu du lot, du fait de ses caracté- 
ristiques non CP/M... 


Le second grand attrait de AGENDOR est 
son sujet : il regroupe cinq utilitaires très 
puissants (à l'instar de SIDEKICK par 
exemple). Son caractère arrière-plan, 
c'est-à-dire son accès à travers n'importe 
quel autre programme, n'en prend que 
plus d'intérêt encore. On obtient ainsi 
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une calculatrice, un bloc-note, un calen- 
drier perpétuel, une gestion de fichier et 
un agenda (qui a donné son nom au pro- 
gramme complet ?...) dont nous allons 
décrire quelques caractéristiques. 


LANCEMENT 
DU PROGRAMME 


Comme nous l'avons indiqué précédem- 
ment, le programme est chargé en 
mémoire (en tapant simplement AGEN- 
DOR sous CP/M), puis lancé par appui 
simultané sur ALT, SHIFT et >. Au bout 
de quelques secondes, l'écran se brouille 
uniformément et on a le choix entre deux 
possibilités : OUVRIR, c'est-à-dire entrer 
dans AGENDOR, ou FIN (quitter le pro- 
gramme). Une fois notre utilitaire ouvert, 
un menu principal propose le choix entre 
les 5 applications (FICHIER, CALCULA- 
TRICE, CALENDRIER, BLOC-NOTE, 
AGENDA) l'option voir que nous décri- 
rons ensuite et la fermeture des fichiers 
pour quitter AGENDOR. 


FICHIER 


Cette option étant choisie, la figure 1 
nous montre comment se présente 
l'écran de notre PCW : la fenêtre attri- 
buée à la gestion de fichier apparaît en 
clair, le reste de l'écran restant brouillé 
{hormis la petite zone détaillant les 
commandes). 

Chaque fiche se présente sous forme de 
7 rubriques (société, nom, adresse 1, 
adresse 2, ville, code postal, téléphone) 


et d’une zone commentaire de 7 lignes 
de 20 caractères (soit 500 fiches sur une 
face de disquette du lecteur A:, ou 2000 
fiches sur une disquette double densité). 
Toutes les fonctions classiques d'une 
gestion de fichiers sont assurées de 
manière parfaite. L'utilisation des tou- 
ches spéciales du PCW est très judi- 
cieuse et l'ergonomie générale du pro- 
gramme, ainsi que sa facilité d'utilisation, 
sont tout à fait remarquables. 


Visualisation 

Les fiches défilent à l'écran par action sur 
les touches + et - encadrant la barre 
d'espacement. La touche FIND permet 
d'entrer un nom de société qui nous con- 
duira directement à la fiche cherchée ou 
qui nous permettra d'en créer une nou- 
velle. La touche CUT permet d'effacer la 
fiche courante et on peut l'imprimer 
directement par appui sur RELAY. 


Recherche et tri 

Les touches PASTE et COPY permettent 
de choisir certaines fiches, la première en 
spécifiant pour les rubriques choisies des 
valeurs mini et maxi, la seconde en spé- 
cifiant des mots-clés dans les zones vou- 
lues. Cette facon de procéder couvre la 
totalité des problèmes courants de tri et 
de recherche. La sortie des résultats peut 
se faire de différentes facons : 

— A l'écran, fiche par fiche. 

— Sur des étiquettes, en paramétrant 
leur taille et leur nombre. 

— Sous forme de listes papier. 

— Sur un fichier disque sous format 
ASCII, pour liaison avec tout autre pro- 
giciel classique. 


CALCULATRICE 


Le choix de cette option fait apparaître 
clairement la calculette dans sa fenêtre. 
Son emploi est des plus simples : appuis 
sur les chiffres voulus au clavier et chaî- 
nage possible des quatre opérations de 
base +,-, x et /. Cet outil est très utile, 
en dépit de son apparente futilité. 


CALENDRIER 


Il s'agit d'un calendrier perpétuel de 
1900 à 1999. Les touches + et - incré- 
mentent et décrémentent le mois ou l’an- 
née concernée. La fenêtre réservée indi- 
que alors la correspondance jour de la 
semaine-date journalière. 


BLOC-NOTE 


Il s'agit d'un carnet dont chaque page 
peut contenir 10 lignes de 30 caractè- 
res (583 pages en A:, 2334 pages en B: 
double intensité). On peut feuilleter les 
pages (touches + et -) et les imprimer 
(figure 2). Une carattéristique très inté- 
ressante de ce bloc-note est de pouvoir 
chercher un groupe de lettres ou un mot- 
clé à travers toutes les pages du carnet 
et retrouver ainsi rapidement un fait 
donné ou établir des corrélations entre 
pages. 


AGENDA 


La taille d'une page AGENDA est sensi- 
blement la même que celle d'une feuille 
du bloc-note. On sélectionne d'abord le 
jour, le mois et l'année à l’aide des tou- 
ches du curseur et des touches + et -. 
Dans une page donnée, l'utilisateur entre 
ses différents rendez-vous. On peut alors 
imprimer la journée (figure 3), la suppri- 
mer ou changer de jour. La recherche par 
mot-clé permet de retrouver une journée 
donnée à partir du simple nom d'une per- 
sonne à rencontrer par exemple !... 


VOIR 


Cette dernière option est illustrée 
figure 4. Toutes les fenêtres sont alors 
clairement visibles et l'écran n'est plus 
du tout hachuré. 

On peut beaucoup vanter ce logiciel, à 
tous les niveaux : 

— Son caractère novateur et inédit le 
rend très attrayant. 

— Les utilitaires proposés sont très 
complets et très bien réalisés. 

— L'ergonomie du programme est tout 
à fait remarquable (utilisation des tou- 
ches particulières, simplicité des com- 
mandes, clarté de la notice). 

Nous sommes convaincus qu'il fera un 
tabac sur les PCW et puissent les con- 
cepteurs et les éditeurs s’aligner sur les 
qualités de ce produit ! 
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Figure 2 
Une page de bloc-note 


Ceci est la première page de 
mon bloc.note. L'aspect le 
plus intéressant est l'option 
de recherche à travers toutes 
les pages d'un groupe de mots 
ou de mots clés. 


Figure 3 
Une page d’agenda 


JEUDI 14 MAI 1987 

08 h 00 Rendez vous dentiste 

09 h 15 Téléphoner à DUPONT 

10 h 00 Visite de DURAND (Pressing) 

12 h 00 Invitation repas municipalité 
15 h 00 Régler compta MARTIN 

16 h 30 Aller chercher Fabien école 

18 h 00 Téléphoner MEDIASERVICE (Pons) 
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Figure 1 

L'écran principal 
d'AGENDOR, avec 

la gestion de fichiers 
activée 


Figure 4 
SENDOR nous montre 
tous ses visages !.… 
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LES FRACTALES 


EN LOGO 


Alain PRE 


De plus en plus de jeux (d'arcades ou 
d'aventures) utilisent un générateur frac- 
tal pour créer un décor sans cesse diffé- 
rent : le joueur a l'impression d'évoluer 
dans un paysage infini. Dans le cas de 
ces jeux, il s'agit de fractales en trois 
dimensions (relief). Nous vous proposons 
de découvrir les fractales à deux dimen- 
sions qui sont bien sûr beaucoup plus 
faciles à programmer. 

Nous avons utilisé Logo car il est idéal 
pour réaliser ce genre d'application. Si 
vous ne connaissez pas encore ce lan- 
gage, voilà peut-être l'occasion de vous 
y mettre. 


COMMENT CREER 
UNE COURBE FRACTALE ? 


Pour construire une fractale, il faut tout 
d'abord choisir un ‘‘générateur'’’ ou 
‘motif de base’ (quelque chose de très 
simple comme, par exemple, le dessin de 
la figure 1). 


Ensuite, il faut trouver un moyen pour 
assembler plusieurs fois cette forme: 
(réduite en dimension) tout en respectant 
la géométrie du motif de départ. 
Comment ! Ce n'est pas clair ? Alors 
reprenons notre exemple : nous allons 
remplacer chacun des segments de 
droite par une copie (à l'échelle 1/3) du 
motif de base. Ce qui va donner le des- 
sin de la figure 2. 


Et ainsi de suite : nous remplaçons 
encore chaque nouveau segment par le 
motif de base réduit neuf fois jusqu'à 
obtenir le dessin de la figure 3. 


Théoriquement, il faudrait poursuivre ce 
travail jusqu'à l'infini. On obtiendrait alors 
quelque chose comme le dessin n° 4. 


Mais, comme le temps c’est de l'argent, 
nous allons nous arrêter bien avant l'in- 
fini. De toutes façons, il faut rester dans 
les limites imposées par la définition de 
l'écran. 


PROGRAMMATION EN LOGO 


Là, c'est vraiment très simple : nous 
allons d’abord (pour fixer les idées) créer 
une procédure qui dessine uniquement 
le motif de base. Nous allons même lui 
donner un paramètre, ce qui permettra 
de dessiner des motifs de base de n'im- 
porte quelle dimension (voir listing 1 et 
figure 6). 


LI 
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Listing 1 


to motif :taille 
fd :taille 
It 90 

fd :taille 
rt 90 
fd :taille 
rt 90 

fd :taille 
It 90 

fd :taille 
end 


Si vous voulez tester cette procédure, 
vous pouvez taper par exemple 
motif 20 

Pour transformer ce dessin en courbe 
fractale, il suffit d'une légère modifica- 
tion de la procédure : remplacer tous les 
traits (fd : taille) par un motif plus petit. 
Vous savez, bien sûr, modifier une pro- 
cédure ; il faut taper : ed [motif]. Vous 
obtiendrez le listing 2. 


Listing 2 


to motif :taille 

if :taille < 3 [fd :taille stop] 
motif :taille / 3 

It 90 

motif :taille / 3 

rt 90 


motif :taille / 3 
rt 90 

motif :taille / 3 
It 90 

motif :taille / 3 
end 


Comme vous l'avez sans doute remar- 
qué, nous avons ajouté une ligne d'’ar- 
rêt (if :taille < 3...). Ceci, bien sûr, pour 
éviter à LOGO d'explorer les profondeurs 
de l'infini. Vous pouvez modifier à 
volonté cette ligne d'arrêt pour changer 
la définition de la courbe : 


if :taille < 10 [fd :taille stop] 
(peu de définition) 

if :taille < 1 [fd :taille stop] 
(définition maximale) 


Vous voulez voir ce que cela donne ? 
Alors tapez motif 30 

La courbe n’est pas centrée sur l'écran. 
Ce n'est pas bien grave : il suffit, pour 
arranger cela, de créer une procédure 
supplémentaire qui initialisera l'écran et 
la position de départ de la courbe 
(listing 3). 


Maintenant, tapez simplement départ 
pour avoir une courbe fractale correcte- 
ment positionnée sur l'écran. 
Reconnaissez que, pour obtenir un des- 
sin aussi complexe en deux procédures 
et moins de vingt lignes de programme, 
il faut vraiment s'appeler LOGO. 
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Figure 5 


ete » 


Listing 3 


to depart 
cs 


pu 
setpos [-120 O] 
seth 90 

pd 

motif 81 

end 


PETITE VARIANTE 


Le programme précédent dessine la 
courbe fractale tout de suite avec la défi- 
nition que vous avez demandée. || peut 
être intéressant de faire dessiner toutes 
les étapes, en partant de la définition la 
moins bonne jusqu'à la définition la meil- 
leure. Nous ajoutons un paramètre à 
notre procédure motif {listing 4). Para- 
mètre qui sera utilisé dans le calcul de la 
condition d'arrêt : 


Listing 4 


to motif :taille :arret 

if :taille < :arret [fd :taille stop] 
motif :taille / 3 . 
It 90 

motif :taille / 3 

rt 90 

motif :taille / 3 

rt 90 

motif :taille / 3 

It 90 

motif :taille / 3 

end 


Ensuite, nous créons une procédure 
étape (listing 5) étape qui appellera motif 
avec des valeurs d':arrêt de plus en plus 
petites. 


Listing 5 


to etape :arret 
if :arret < 1 [stop] 


motif 81 :arret 
etape :arret / 3 
end 


_ 


Et, enfin, nous modifions départ pour 
appeler non plus motif mais étape 
(listing 6). 


Listing 6 


to depart 

cs pu 

setpos [-120 O] 
seth 90 

pd 

etape 81 

end 


Pendant que nous ÿ sommes, voici 
encore une petite amélioration : plutôt 
que de faire superposer les courbes, 
nous allons effacer le tracé de l'étape 
précédente avant de redessiner. Mais 
pour que le résultat soit impressionnant, 
il faut effacer la courbe au fur et à 
mesure de l'avancement du nouveau 
tracé. La procédure motif prend alors sa 
forme finale telle que le montre le 
listing 7. 


Listing 7 


to motif :taille :arret 

if taille < :arret [fd :taille stop] 
pe fd :taille bk :taille pd 
motif :taille / 3 

It 90 

pe fd :taille bd :taille pd 
motif :taille / 3 

rt 90 

pe fd :taille bk :taille pd 
motif :taille / 3 

rt 90 

pe fd :taille bk :taille pd 
motif :taille / 3 

It 90 

pe fd :taille bk :taille pd 
Motif :taille / 3 

end 


D'AUTRES COURBES... 


Maintenant que vous savez comment 
inventer et programmer une courbe frac- 
tale, vous n'allez pas vous en priver. Les 
listings 8 et 9 vous montrent quelques 
exemples. 


Listing 8 


- 


branche 64 
end 


to branche :long 

if :long < 3 [stop] 
fd :long 

rt 45 

branche :long / 2 
It 90 

branche :long / 2 
rt 45 

bk :long 

end 

— 


Il est intéressant de faire varier l'angle 
entre les branches et de désymétriser 
l'arbre (une branche avec :long / 2 et 
l'autre :long / 3 par exemple). 


Tapez exodus 60 et vous allez voir ce 
que vous allez voir. 

Il y a des ouvrages entiers consacrés aux 
courbes fractales. Autrement dit, il y en 
a beaucoup d'autres sortes. Mais il est 
plus amusant de créer les siennes. 
Essayez vous verrez... 
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Listing 9 


to exodus :taille 

if :taille < 3 [stop] 
repeat 4 [fd :taille exodus :taille 
/ 3 rt 90] 
end 


LEXIQUE DES PRIMITIVES UTILISEES 


cs (clear screen) 
Passe en mode graphique et efface l'écran. 


end 
Signale la fin d'une procédure. 


fd x (forward) 
Trace un segment de longueur x à partir du point courant, dans la direction 
courante. 


ht (hide turtle) 
Ne fait plus afficher la pointe de flèche, ce qui augmente la vitesse de tracé. 


It x (left) 
Change la direction courante de x degrés, sur la gauche. 


pd (pen down) 
Tous les déplacements du point courant produiront un tracé. 


pe (pen erase) 
Efface au lieu de tracer. 


pu (pen up) 
Lève le crayon, c'est-à-dire autorise les déplacements du point courant sans 
tracé. 


rt x (right) 
Change la direction courante de x degrés, sur la droite. 


seth x 
Fixe la direction courante à x (degrés). 


setpc x 
Change la couleur des tracés (x : O à 3). 


setpos [x y] 
Fixe la position du point courant à (x, y). 


st (show turtle) 
Affiche la pointe de flèche. 


to 
Annonce la définition d'une procédure. 
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RAPPEL DE GEOMETRIE LOGO 


En LOGO, tous les tracés se font à partir du point courant et dans la direction 
CS Ces deux paramètres sont représentés sur l'écran par une pointe de 
èche 


Direction 
courante 


AO 
AT / 
re 


F 


Point courant 


Ilest possible de changer la direction courante (rt, It, seth) et le point courant (fd, 
bk, setpos) en produisant un tracé (pd) ou sans laisser de trace (pu). 

Certains ‘‘simples d'esprit'’ ont assimilé cette représentation mathématique aux 
évolutions d’une tortue. Animal qui se serait réincarné dans la pointe de flèche 
précédemment citée. 

Soyons indulgent envers ces personnes et laissons les martyriser ce qu'elles croient 
‘être un sympathique quadrupède carapaçonné. 
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LOGOMONDE 

(Hatier) 

Livre + cassette Thomson, Apple. Une 
trentaine d'activités LOGO abondam- 
ment commentées (A. Pré, G. Godimier, 
M. Bonneton). 


LOGOMONDE 2 

(Hatier) 

Livre + cassette Thomson. Intelligence 
artificielle et LOGO (A. Pré, G. Godimier). 


LOGOMONDE AMSTRAD 

(en cours d'édition) 

Livre + disquette Amstrad. Des exem- 
ples de ce qu'il est possible de faire avec 
DR LOGO sur AMSTRAD (A. Pré, 
G. Godimier). 


GERESCO 

(Hatier) 

Logiciel de gestion PC ou compatible. 
Gestion des élèves, analyse de résultats, 
éditions de bulletins (A. Pré). 


LE MONSTRE DE L'INFO A L'ECOLE 
Revue Diffusion : Ademir. L'informatique 
dans l’enseignement (G. Godimier). 


20000000000000000000000000 
PROTEGER VOTRE AMSTRAD 


TOUS LES SACS ET HOUSSES SONT ADAPTÉS A CHAQUE TYPE DE MATÉRIEL ET LES PASSAGES DE CABLES SONT PRÉVUS. 


Cochez 
bien 

les cases 
et 
couleurs 


L 


[] Housse pour Amstrad (claier) 
CPC 46406640 61280 PCW 825671 
Coloris: beige, blanc, bordeaux, noir, 


Sac pour Amstrad (clavier) 
CPC 464701664061 280 PCW 8256 €] 
Coloris: bleu, gris ou sable. 

Prix: 290 F TTC 


Sac pour moniteur Amstrad mono- 
chrome [1 couleur. [1 

Coloris: bleu, gris ou sable. 

400 F TTC 


130 F TTC 
monc 


Coloris: beige, blanc, bordeaux, noir, 


130 F TTC 


Housse pour moniteur Amstrad. Couleur re 


an 


Pochettes disquettes 3” ou 3,5" 
pour 1 disquette 29 FTTC 
pour 6 disquettes .... 116 F TTC 
pour 10 disquettes 150 FTTC 
[ pour 32 disquettes .. 200 F TTC 
Coloris: gris, bleu ou sable. 


Les sacs pour claviers AMSTRAD 464 - 664 - 6128 comprennent 1 poche pour le clavier plus 1 autre du même volume pour y ranger les accessoires. 


POUR COMMANDER: Retournez-nous cette publicité en cochant le ou les pro- 
duits que vous désirez recevoir et en remplissant le bon ci-dessous. Pour les coloris, 


rayez les mentions inutiles. 


64 73 


PERS 14 


17, rue Russeil - 44000 NANTES 


ZARD Créations - 99 31 


Signature: 


@ Port PTT à ajouter au montant de votre commande: 25F 
@ Joindre votre règlement par chèque ou mandat à votre commande. 


Prénom 


insérer des utilitaires et gagner de la place 


e Vous élargissez le champ d’ac- en i 
tion de votre AMSTRAD. Avec la mise E la 


en pratique des programmes et des 
“recettes”, vous découvrez de nouvelles et 
passionnantes utilisations de votre ordi- 
nateur. : 


Le complément indispensable 
de votre AMSTRAD 


Présentation : classeur à feuillets 
mobiles 400 pages grand format 
(21 x 29,7 cm). Prix de lancement 
375 F TTC jusqu'au 30.06.87. 
Après cette date, 450 F TTC. 


ATENTION; 
DATE LIMITE 


_HOUNE — 


© Structure interne des 
CPC 464, 664 et 6128 

e Circuit interface PIO 8255 
e Le processeur son 


© Souris pour le CPC 
e Bit et octet 
© Création de programmes 


AY 38912 © Interprétateur Basic 1.0 

e AMSDOS et 1.1 créé par Locomotive 

e Le Firmware e Le CPU Z80A 

e CP/M © La programmation des CPU 
e CP/M 22 et CP/M+ e Modes d'adressage 

e Drives, moniteurs, © Un assembleur 
imprimantes. opérationnel en Basic 


75012 Paris 


EXTRAIT DE LA TABLE DES MATIÈRES 


© Code d'erreur 

e Appel de programmes 
© Cours de LOGO 

e Turbo-Pascal 

e Graphiques avec le CPC 
© Graphiques animés 

© Commande de 
synthétiseur de sons 

© Gestion de fichier 

e dBase Il 


dérable : il évolue à la même vitesse que 
les techniques et le matériel que vous 
utilisez. Trois à quatre fois par an, des 
mises à jour et compléments vous seront 
envoyés (150 pages environ, 215 F, 
service annulable sur simple demande). 
Vous disposez ainsi régulièrement de 
nouveaux programmes et d’une infor- 
mation parfaitement à jour sur les 
nouveaux matériels et logiciels. 3 


Profitez vite de notre offre 
de lancement ! 

Pour passer le plus vite possible à la 
pratique sur votre AMSTRAD, réser- 
vez dès aujourd’hui votre exemplaire de 
‘“Comment_exploiter_ toutes les res- 
sources et_ augmenter les ormances 
de_ votre AMSTRAD” Remplissez et 
renvoyez sans plus attendre le Bon de 
souscription ci-dessous, accompagné de 
votre réglement. Vous êtes ainsi assuré de 
recevoir cet ouvrage dès sa parution et 
vous réalisez une économie de 17 % par 
rapport au prix public à parution. 


Editions Weka - 12, cour StEloi 


e Wordstar 
e Muitiplan 
© Programmation de jeux 


Et des dizaines 


thémati , . 
9 Statistiques d’autres sujets 
e Applicati . 
rer passionnants.. 


e Modulateur pour 
télévision couleur 


REPORTAGE 


LES 3 JOURS AMSTRAD, 
PC, MINITEL DE LYON 


Les 15, 16 et 17 mai, s'est déroulé à 
Lyon une exposition concernant les 
matériels AMSTRAD, le minitel et les 
compatibles IBM. Heureux abonnés et 
lecteurs de CPC, AMSTAR ou PCompa- 
tibles, une réduction vous était offerte 
sur le prix d'entrée. Ceci a dû sans doute 
vous inciter à faire le déplacement puis- 
que le nombre d'entrées a augmenté de 
500 par rapport à la 1ere édition du salon. 
C'est donc 2500 personnes qui ont 
arpenté les allées où éditeurs et reven- 
deurs présentaient leurs produits. 

Succès certain pour Sémaphore avec le 
scanner de Dart et Graphpad Il, une 
tablette graphique pour PCW munie d'un 
logiciel permettant toutes sortes de 
manipulation d'objets définis en 
mémoire. Toujours sur PCW, la série des 
‘*8000"' s'est enrichie d'un MASTER- 
FILE. Il s'agit d'une gestion de fichiers 
sophistiquée qui utilise au mieux les 


Olivier SAOLETTI 


capacités du disque virtuel. 

Amstrad ayant sorti un compatible (vous 
ne le saviez pas ?), Tasword et Tasprint, 
deux logiciels connus, se sont adaptés 
aux nouvelles machines, le tout pour un 
rapport qualité/prix des plus satisfai- 
sants. 

Autre pôle d'attraction, le stand Wings 
avec le logiciel AMX Pagemaker tournant 
sur 464 plus une extension mémoire de 
64 Ko. La P.A.O. (Publication assistée 
par ordinateur) étant actuellement en 
vogue, les CPC ne pouvaient rester en 
arrière. Muni de la souris AMX, (elle 
n'est pas obligatoire, mais elle offre, 
outre la facilité d'utilisation, un ‘‘look’ 
sensationnel), Pagemaker permet, à 


coup de menus déroulants et d'icônes, 
de fabriquer un petit journal. Il est même 
possible d'intégrer des images digitali- 
sées et de les disposer à l'intérieur de vos 


textes. 


\ 


Gérard Pellan (à gauche) et Michel Archambault 
en pleine action sur le stand CPC. 
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Le digitaliseur ARA de Jagot et Léon fai- 
sait une démonstration de ses possibili- 
tés en se connectant sur un téléviseur. 
Même débauche d'images avec le logi- 
ciel Pastel qui permet la composition de 
pages VIDEOTEX avec quelques options 
supplémentaires telles que la transforma- 
tion des images digitalisées par ARA et 
la possibilité de fabriquer fenêtres et 
masques. Le dernier maillon de la chaîne 
est un serveur 4 voies possédant une 
extension mémoire de 256 Ko (celle-ci 
permet un stockage et un traitement des 
images très rapide). 

Du côté purement logiciel, on pouvait 
trouver Orthogus, un programme éduca- 
tif sous forme d'enquête policière (CF), 
ainsi qu'un utilitaire mathématique trai- 
tant des foncrions numériques. Logys, 
outre Maths-collège et Maths-école déjà 
testés dans CPC, présentait plusieurs 
programmes à orientation profession- 
nelle : Financius, gestion d'association, 
analyse financière. 

Sur PC, Micro Star's proposait GT +, un 
logiciel de gestion intégrée comprenant 
gestion de stock, comptabilité, gestion 
commerciale, courrier électronique, avec 
des possibilités d'extension :comme une 
connexion caisse enregistreuse ou une 
comptabilité analytique. Autre pro- 
gramme présenté par Micro Star's, Dis- 
trib, un gestionnaire pour magasin de 
prêt-à-porter. Le club C.I.A. (Club Infor- 
matique Amstrad) tenait un stand 
bruyant puisqu'envahi d’exclamations, 
de sonorités stéréophoniques et 
amstradiennes. 

Autre club présent par l'intermédiaire de 
quelques membres : Ams’cercle dont un 
des animateurs, Michel Archambault est 
venu nous rendre visite sur le stand CPC. 
Cette exposition a été pour nous l’occa- 
sion de répondre à vos questions et pour 
vous la possibilité de vous procurer les 
anciens numéros (pas tous malheureu- 
sement !) 

C'était également le moment de se pro- 
curer des produits à tarif réduit tels que 
disquettes 3 et 5 pouces (Majuscule et 
France-disquette) ou quelques unités 
centrales (on pouvait même trouver des 
ATARI 520 ST sur lesquels tournaient de 
fabuleuses ‘’démos’'). Si vos moyens 
financiers étaient plus importants, MEI 
pouvait combler vos désirs avec toute 
une gamme de fournitures pour l'infor- 
matique d'entreprise. 

Comme vous le constatez, il y en avait 
pour tous les goûts, le tout dans une 
ambiance de grand club informatique. 


BANC D'ESSAI 


Les interfaces 


" 


Faire parler l'ordinateur est toujours amu- 
sant : les compte-à-rebours sont plus 
réalistes, lors du tir d'un missile ; les desi- 
derata d'un robot, exprimés en clair, peu- 
vent apporter une touche d'humour à 
votre dernier programme. Seule l'imagi- 
nation limitera les possibles utilisations 
d'un synthétiseur vocal... 

Construit autour du célèbre SPO 256, 
l'un des circuits intégrés ‘vocaux’ les 
plus anciens, le synthé DK'Tronics a pour 
seul inconvénient son accent britannique 
très prononcé. Avec lui, il sera difficile 
de parler en bon français. Essayez de 
lui faire prononcer la lettre ‘‘U'’ par 
exemple ! Ceci étant dit, tout le reste est 
fort bien pensé. 

L'utilisateur apprendra avec plaisir que ce 
synthétiseur est doté d’un amplificateur 
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—, 


for the AMSTRAD 
6128 COMPUTER 


THE POWER GAMHIND YOUR AMSTRAD 


stéréo. Cet ampli viendra se substituer 
avantageusement à celui qui équipe 
l'AMSTRAD. Désormais, toutes les illus- 
trations sonores (vocales ou musicales) 
seront reproduites sur les 2 haut-parleurs 
livrés avec l'interface. Deux réglages 
sont accessibles sur l'amplificateur : le 
volume sonore et la balance droite- 
gauche (ou gauche-droite si vous êtes un 
lecteur susceptible et engagé politique- 
ment). Le second réglage s'effectuera à 
l'aide d’un petit tournevis ; il a déjà été 
pré-ajusté en usine. 

Le synthétiseur DK'Tronics est commer- 
cialisé en plusieurs versions, fonction de 
la machine qui doit l’accueillir et selon 
que le. logiciel est livré sur support 
magnétique ou en ROM. 

C'est cette dernière version (logiciel en 
ROM) que nous avons testée. Sentant 
grandir votre impatience, je ne vous ferai 
pas attendre davantage. 


Le CPC reconnaît la présence de la ROM 
du synthé {je ne vais pas écrire le mot 
en entier à chaque fois...) en affichant 
‘’SPEECH ROM VER. 1.1”. L'instruction 
ISPEAK permet d'initialiser la ROM et 
lance un test interne donnant tout à coup 
la parole à l'AMSTRAD. La liste des com- 
mandes disponibles est affichée : il ne 
reste plus qu'à les essayer ! 
Disposant d’un espace limité pour ce 
banc-d'essai (on ne va tout de même pas 
détailler la notice !), nous allons voir qu'il 
existe, en fait, deux grands modes de 
fonctionnement, les autres en dérivant 
plus ou moins. 

A chaque phonème est associé un code 
(il y a ainsi 59 sons et 5 durées de pause) 
décimal qui, envoyé à l'adresse du 
synthé, produit un son. Ceci étant dit, on 
peut donc programmer ‘‘son par son”, 
par l'intermédiaire de listes de DATA. Les 
octets lus sont envoyés dans un buffer 


mstrad construit des ordinateurs ; 
DK'Tronics les complète avantageu- 
sement par des interfaces comblant 


certaines lacunes de la machine. Présen- 
tées en boîtier plastique de belle facture 
(mais non, pas le prix, la réalisation !), les 
extensions peuvent être accouplées, non 
pas pour faire des petits, mais pour ouvrir 
à l'utilisateur des horizons nouveaux. 
Curieusement, DK'Tronics édite un manuel 
d'utilisation commun à toutes les interfa- 
ces. L'acheteur d’un synthétiseur vocal se 
laissera-t-il tenter, au vu des possibilités 
décrites dans le manuel, par un crayon 
optique ou un RAM-Disque ? 

Les périphériques DK'Tronics que nous 
avons testés pour vous sont tous disponi- 
bles chez ORDIVIDUEL. En vous recom- 
mandant de ‘’CPC’’, le meilleur accueil 


PONS spercy 


vous sera réservé. 


qui pourra en contenir jusqu'à 250. Ces 
sons peuvent être envoyés en mode 
‘direct’ ou en mode ‘programme’, 
grâce à un astucieux contrôle des inter- 
ruptions, le synthé ne ralentira pas trop 
votre programme. Grâce aux sons élé- 
mentaires, on pourra former des mots, 
mais aussi produire des effets sonores 
assez recherchés. . 
L'autre mode de fonctionnement fait 
appel à un convertisseur Texte/Parole. 
L'idée est excellente car on peut ainsi 
introduire du texte en anglais, sous forme 
de chaînes de caractères, et le faire pro- 
noncer au St T (j'en ai marre d'écrire 
synthé...) au moyen d'un simple PRINT. 
Le logiciel est conçu pour reconnaître 
certaines règles d'exception de la langue 
anglaise, ce qui simplifie bien notre 
tâche. 

J'ai bien dit ‘’langue anglaise’’ car, pour 
le français, il faudra ruser. Certains mots 


anglais devront être orthographiés diffé- 
remment (par exemple, ‘‘final”’ est pro- 
noncé presque ‘à la française'’ et devra 
être écrit ‘‘fianol’’ pour ressembler à de 


l'anglais). Suffit de savoir, quoi ! La lec- - 


ture de la notice nous apprend que le buf- 
fer de texte peut contenir jusqu'à 100 


caractères, ce qui permet de former des 


phrases suffisamment longues. Avec sa 
contenance de 250 phonèmes, le buffer 
de parole fera parler la machine pendant 
45 secondes... mais une commande 
appropriée permet de lui couper le 
sifflet ! 

Profitant d'une autre caractéristique de 
ce St T (j'en profite !), l'AMSTRAD 
pourra dicter les listings ! En effet, tout 
ce qui apparaît à l'écran sera énoncé par 
la machine. Hélas, ceci restera parfois 
assez confus, la voix robotisée s'accom- 
modant mal de certaines associations de 
sons. 


Le synthétiseur (quel courage !) DK'Tro- 
nics est également programmable à partir 
de l'assembleur. La notice donne quel- 
ques explications à ce sujet. Cette notice 
se termine par une table des phonèmes, 
listés par numéro d'ordre avec, pour cha- 
cun d'eux, un exemple de mots extraits 
du vocabulaire anglais. 

Malgré quelques petits défauts (notam- 
ment une voix un peu trop métallique lors 
de l'utilisation du convertisseur texte/ 
parole), le saint thé (normal, il est bri- 
tish..) DK'Tronics est séduisant par ses 
possibilités. Le constructeur offre à l'uti- 
lisateur, en plus du synthétiseur (c'est la 
dernière fois que je l’écris), un ampli sté- 
réo et ses 2 HP... pour le même prix ! 
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BANC D'ESSAI 


LE RAM-DISQUE 


Un disque de 254 Koctets utilisables, 
voilà ce qui se cache sous le nom de 
‘Silicon Disc’’.… RAM-Disque en ‘‘fran- 
çais’’ (je vois les habits verts de nos aca- 
démiciens en frémir !). 

A quoi peut bien servir un RAM-Disque ? 
A charger et sauvegarder des program- 
mes, fichiers, blocs de données, beau- 
coup plus rapidement. Et.ça marche sur 
n'importe quel CPC ? Oui mon bon Mon- 
sieur. à condition que ledit CPC soit 
déjà équipé d'au moins un lecteur de dis- 
quettes. Le RAM-Disque se comporte 
alors comme une disquette normale aux 
différences suivantes près : 

— Les fichiers sont lus et écrits beau- 
coup plus rapidement. 

— ls sont définitivement perdus en cas 
de coupure de courant. 

— On les retrouvera même après un 
RESET complet. 

Quel intérêt peut-on avoir à utiliser un 
RAM-Disque ? Le gain de vitesse lors de 
la manipulation de gros fichiers. 

Le RAM-Disque DK'Tronics est utilisable 
sous AMSDOS (en BASIC) ou sous CP/M 
(2.2 ou CP/M +). L'interface pour 464 et 
664 se présente en 2 boîtiers : l’un con- 
tient le système d'exploitation, l’autre la 
RAM. L'un dans l'autre. ils se connec- 
tent (aïe, pourvu que M. Pasqua ne fasse 
pas interdire CPC !) et sont unis pour le 
meilleur (et pour le pire, si vous les utili- 
sez mal) et pour le grand bien de l'ordi- 
nateur hôte. 

Selon que votre CPC est déjà doté d'une 
ou 2 unités de disquettes, le RAM- 
Disque deviendra le disque B ou C. 
Après une initialisation relativement sim- 
ple, destinée à indiquer au système la 
présence d’un disque supplémentaire, 
l'utilisateur transfèrera ses fichiers de la 
disquette vers le RAM-Disque. Sous 
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L'EXTENSION 
RAM 256 K 


Encore une extension de mémoire, mais 
qu'il ne faut pas confondre avec le Ram- 
disk. Celle-ci a pour vocation de gonfler 
votre CPC 464, 664 ou 6128 en lui attri- 
buant 256 Ko supplémentaires. 

Cette mémoire est divisée en 16 ban- 
ques de 16 Ko qui seront accessibles par 
commutation au moyen d'un jeu de com- 
mandes RSX. Mais n'allez pas imaginer, 
comme le font bien souvent les débu- 
tants, que vous allez pouvoir écrire des 
programmes en BASIC de près de 
200 K. Ce n’est pas si simple ! Par con- 
tre, elle vous rendra les plus grands ser- 
vices pour sauvegarder tout ce qui est 
gourmand en mémoire, comme par 
exemple vos pages d'écran, vos tableaux 
ou vos chaînes de caractères, allégeant 
d'autant vos programmes en BASIC. 
L'interface est livrée avec une disquette 
contenant le logiciel d'implantation des 
RSX. Notez que vous avez le choix de 
l'adresse d'implantation et que, par 
défaut, le programme s'installera à 
l'adresse la plus élevée disponible. Dès 
que cette opération est effectuée, l'écran 
vous indique le nombre de banques dis- 
ponibles. Voyons maintenant le rôle des 
différentes fonctions complémentaires, 
mais soulignons au préalable que la 
notice d'emploi fort détaillée vous facili- 
tera la première prise en main. 
ISAVES,n et ILOADS,n permettent de 
stocker en mémoire et de rappeler des 
pages écrans, n étant le numéro de bloc. 
Les anglophiles auront interprété le S de 
la commande à Screen. 

Syntaxe analogue pour ISAVEW,F,n et 
ILOADW,F,n (W comme window) qui 
ont respectivement pour fonction de sau- 


CP/M, la procédure de configuration du 
Setup est décrite dans le manuel de 
DK'Tronics, ce qui ne laissera pas errer 
inutilement l'utilisateur. Toujours sous 
CP/M, il faudra utiliser PIP pour transfé- 
rer les fichiers car COPYDISC et DIS- 
COPY, plus gourmands en TPA, ne tour- 
nent pas. 

Les temps (sont durs.) comparés de 


vegaruer eL ue rappeler des Tenetres 
caractérisées par leur numéro, n étant 
toujours le numéro de bloc. Ces deux 
commandes vous permettront de réali- 
ser facilement des menus superposés à 
la Mac-Intosh. 

High et ILow chargent deux images en 
mémoire centrale, l’une à la place habi- 
tuelle (high) et l’autre immédiatement au- 
dessous (low), ce qui, grâce à la com- 
mande associée ISwap, vous permettra, 
par commutation de pages, de réaliser 
des animations graphiques. 

Quittons maintenant le domaine de 
l'écran pour voir le stockage de données 
qui s'effectue de manière analogue par 
ISAVED (comme Data) et ILOADD. Les 
données peuvent être des tableaux, des 
variables ou des chaînes de caractères. 
Heureusement que la notice est très 
claire à ce sujet et l’expérimentation, à 
l'aide des petits programmes de démons- 
tration inclus, vous permettra très faci- 
lement de tirer le meilleur parti de ces 
deux commandes. 

Il nous reste à citer les quatre dernières 
commandes qui sont IASKRAM, IPEEK, 
IPOKE et IBANK qui s'adressent au pro- 
grammeur plus expérimenté qui pourra 
également, s’il a bien assimilé la topogra- 
phie de la mémoire de l'AMSTRAD, 
écrire ses propres routines en BASIC ou 
en assembleur pour s'affranchir des RSX 
d'origine. 

Signalons enfin que cette extension per- 
met d'utiliser CP/M+ tel qu'il est livré 
avec le 6128 et que la commande IEMU- 
LATE transformera votre 464 ou 664 en 
véritable 61281 


chargement d'un fichier sont éloquents : 
pour 30 K de BASIC, il faut 7 secondes 
sur disquette et moins de 1,5 s avec le 
RAM-Disque.. Spectaculaire également, 
le chargement d'un écran de 17 K à partir 
du RAM-Disque.… 

Si vous êtes consommateur de gros 
fichiers, pensez à ce RAM-Disque. Au 
fait, il existe aussi en version 64 K BR 


LE CRAYON OPTIQUE 


Le crayon optique DK'Tronics se con- 
necte par l'intermédiaire d’un mini jack 
à son boîtier d'interface qui présente, 
vous vous en doutez, un air de famille 
avec les autres périphériques de la 
marque. 

Ce boîtier contient, outre l'électronique 
du stylo, une ROM dans laquelle est 
implanté un logiciel de dessin exploitant 
les possibilités de l'outil. La mise en 


œuvre de l'ensemble est extrêmement 
simple. Il suffit de taper ILIGHTPEN pour 
voir apparaître le premier menu du logi- 


ciel intégré dans la ROM qui aura détecté : 


la présence éventuelle d’un lecteur de 
disquette et vous proposera de charger 
ou de sauvegarder vos dessins sur le 
support magnétique adéquat. ‘‘Next’’ 
permet de passer au menu suivant et il 
y en a cinq en cascade ainsi de suite. Le 
second vous propose d'effacer l'écran et 
de calibrer le crayon optique qui a besoin, 
pour fonctionner correctement, d'un 
niveau de lumière ni trop faible ni trop 
élevé. Vous règlerez donc la brillance de 
votre écran au niveau suffisant pour pou- 
voir déplacer la petite cible aux quatre 
coins de l'écran. De temps à autres, 
cette petite cible a des tremblements 
erratiques, mais la notice précise que 
c'est sans importance car le dessin 
pourra être corrigé à la loupe par la suite. 
Les quatre flèches de direction vous per- 
mettront de centrer exactement la cible 
sur le stylo. 

Une fois cette opération effectuée, vous 
voilà prêt pour le dessin. Vous disposez 
pour cela d'une palette de 10 couleurs 
qui vous serviront pour les crayons (dis- 
ponibles en 4 épaisseurs), pour l'aérogra- 
phe, les textes qui peuvent être horizon- 
taux ou verticaux et, enfin, pour la fonc- 
tion de remplissage de formes, matéria- 
lisée par un robinet. Comme tous les pro- 
duits concurrents, le stylo DK'Tronics a 
besoin de lumière pour fonctionner, d'où 
une certaine difficulté pour choisir une 


couleur sombre. Mais l’auteur du pro- 
gramme y a remédié en autorisant la 
sélection de couleur par la bordure jaune 
qui entoure chaque teinte de la palette. 
En dehors des cercles et des rectangles 
accessibles par le menu, il est possible 
de tracer des figures complexes au 
moyen ‘‘d'élastiques’’ tendus entre des 
punaises. Votre courbe complexe sera 
ainsi constituée d'une succession de 
lignes courtes et cette fonction se révèle 
très pratique à l'usage. Notons aussi la 
présence d'une fonction de copie, 
d’agrandissement ou de réduction d’une 
partie du dessin. La fonction loupe est 
ici appelée ‘‘calepin'’. Au moyen d'une 
fenêtre réglable, vous sélectionnez une 
partie de l’image avant de la transférer 
vers le calepin où elle apparaîtra en plein 
écran et là vous pourrez la modifier au 
pixel près. 

Reste un dernier point : l'impression de 
vos chef-d'œuvres. Vous disposez pour 
cela d’un petit programme livré sur une 


cassette et qui vous offre le choix de 
l'imprimante entre Epson et Amstrad. 
Après notre test, nous re s sim- 


plement que DK'Tronics n'ait pas installé 
à l'extrémité de son stylo un petit bou- 
ton poussoir manœuvrable du bout de 
l'index, ce qui éviterait de manipuler la 
touche Enter de la main gauche. Mis à 
part ce petit regret, ce stylo optique s’est 
révélé d’un usage fort agréable et la 
gamme des outils mis à la disposition de 
l'artiste permet facilement _de dessiner 
avec une grande précision 


SERVEUR 
MINITEL 


N'oubliez pas 
36.15 code MHZ 


ne 


Je livre + la cassette 


103 F :zxco 


Jeux - Gestion 
Education - Domestique 
Impression de documents 


Un best-seller 


Bon de Commande 
à renvoyer à STAMP DIFFUSION, 17, rue Russeil - 44000 NANTES 


La B.A.L. permet un dialogue direct avec 
la rédaction. 

Les petites annonces ouvrent la porte aux 
bonnes affaires ! 


Exploitez votre Amstrad. 103 F - Port gratuit. 
Nom Prénom 


Adresse 
Ci-joint chéque de 103 F. 


BIDOUILLE 


Eddy DUTERTRE 


Les trois versions de CPC disposent 
d'origine d'un port d’entrées-sorties faci- 
lement utilisable pour les bricoleurs. La 
sortie imprimante centronic est consti- 
tuée de huit lignes en sortie (DO à D6 et 
STROBE) et d’une en entrée (BUSY). Ce 
port est actif par le BASIC avec les ins- 
tructions PRINT #8 ou LIST #8, mais le 
résultat obtenu est tributaire du logiciel 
interne de l'ordinateur. Par contre, grâce 
à deux instructions particulières du 
BASIC (OUT et INP), il est possible de se 
rendre maître de la configuration de ces 
lignes. 

L'important est de savoir que, pour les 
sorties, l'adresse du port est &EFOO et 
pour l'entrée &F532. Ainsi, pour mettre 
toutes les lignes DO à D6 et STROBE à 
un, il faudra faire : 


OUT &EF00,&7F ou OUT &EF00,127 


La ligne sept (STROBE) est inversée par 
rapport aux autres car elle passe à un en 
mettant le bit huit à zéro d'où &7F à la 
place de &FF (01111111=&7F 
11111111=@&FF) 

ligne. 76543210 76543210 
Pour une ligne sur deux à un : 


OUT &EF00,&2A ou OUT &EF00,42 
&2A..... 00101010 (notez le bit 7 à 
zéro) 

ligne....76543210 


Inversement, pour lire la ligne en entrée 
(BUSY), il faudra faire : 


A=INP &F532:A =A AND 64 


Si l'entrée est à un, À aura pour valeur 
64 sinon A sera nul. 


Comment exploiter ces sorties ?. 


Une première mise en garde. ll n'est pas 
possible de commander directement, 
avec ces sorties, des relais ou autres 
systèmes tels que voyants. Un petit 
montage buffer est nécessaire (voir 
schéma). Pour l'entrée, il ne faudra pas 
dépasser 5 volts. L'idéal est de disposer 
d’un contact à la masse (interrupteur ou 
contact de relais). 


34 


10 REM 
ZO REM 
30 REM 
40 FOR 
50 OUT 
&0 FOR 


EXEMPLE DE CHENILLARD 

AE AE MEME MOMENT 

LA VITESSE S'AJUSTE A LA LIGNE 45 (T) 
N=G TO 7 

LEFOO;, 2°N 

T=1 TO AGO:NEXT T 


70 NEXT N 
30 GOTO 40 


Schéma d’un buffer . 


ÉRRERTe 
le 4, 7k 


venant de la prise IMP. 
D6 à D6 ou STROBE 


© 
b — —{| UTILISATION | 


LE” ri . 7 18 Volts max 
Diode de protection 
PNEGPE | (IN480 7) 


Les masses sont a relier . 
a la broche 14 ou 15 de la 
prise IMP. 


Entrée sur BUSY conseillée 


broche 11 
(husy) 


( 
b 


", 


18K Entree 


broche 14 | e eNgere 12 U max 


(masse) 


17 16 15 14 13 18 11 18 9 8 7 6 5 4 3 8 1 


35 34 33 32 31 39 29 28 27 26 25 24 23 2e 21 20 19 


BROCHAGE DU CONNCTEUR IMPRIMANTE 


(vue de l'arriere) 


15-MASSE 


* ALIM. EXTERIEURE 


extension 256K 


Version RAM : augmente de 256 K la capacité mé 
moire de votre CPC 

version silicon disk: permet le travail sur fichiers 
comme sur un disque normal mais avec un temps 
d'accès hyper-rapide 

extension 256 K RAM: 

pour CPC 464-664 

pour CPC 6128 . 
xtension 256 K silicon disc : 
pour CPC 464-664 

Clpour CPC6128. 


999F 
..999F 


999F 
999F 


extension 256 K RAM 


Que ce soit en traitement de texte, gestion de fichier 
ou tout autre application cette extension mémoire vous 
permettra d'être plus “à l'aise” et vous évitera d'in- 
cessants accès disque. 
extension 256K : 
pour PCW8256 


..399F 


Kironics 


les complices de vos Amstrad 


Extension 64 K 


Avec cette extension votre CPC 464 (ou 664) pourra, 
lui aussi, faire tourner DBASE II, multiplan ou sim- 
plement vous permettre d'être moins “à l'étroit” pour 
vos propres programmes 
Extension 64 K: 
extension 64K 


.499F 


Interface manette + 
synthétiseur 


Interface joystick + contrôleur de son: 
En plus de la possibilité de brancher un joystick, vous 
avez la possibilité de créer des sons ou de la musique 
sur 3 canaux et 8 octaves. De plus un port entrée/ 
sortie vous permet le contrôle d'appareils externes. 
Interface manette + synthétiseur : 
POUR POW éssas dire csnstetetunsese 


.. 499F 


Synthétiseur vocal 


Grâce à ce synthétiseur votre Amstrad va enfin pou- 
voir s'exprimer. Très simple à programmer il donnera 
un “plus” de qualité à vos programmes. Son origine 
anglaise lui vaut de conserver cet accent même lors- 
qu'il parle en français. Livré avec haut-parleur. 
synthétiseur vocal 
{avec logiciel en ROM): 
pour CPC6128 . 

pour CPC464-664 ..... 
ynthétiseur vocal 


avec logiciel en cassette) : 
pour CPC 464-664 


499F 
..499F 


.449F 


Interface manette 


Enfin vous allez pouvoir jouer sans “tricoter” avec 
vos doigts sur le clavier. Vous pourrez également 
utiliser le joystick dans votre propres programmes 
que ce soit en basic ou sous CP/M. 

Interface manette : 

Dinterface joystick PCW 
Dinterface joystick + joystick magnum ........ 


Tous les produits DK TRONICS pour Spectrum fonctionnent sur les modèles 48 K, 128 K et 128 K" + 2" 


Le complément indispensable de votre Spectrum. Vous 
allez enfin pouvoir utiliser les instructions LPRINT 
{ou L LIST) mais aussi faire des copies d'écran sur 
imprimante. 

Interface centronics : 


Clinterface centronic .…........................ .. 399F 


22, rue de Montreuil 94300 VINCENNES - Tél.: 


synthétiseur vocal 


Grâce à ce synthétiseur votre Spectrum va enfin 
pouvoir vous parler. Très simple à utiliser, il vous 
étonnera par sa capacité de parler en français, alle 
mand, espagnol, anglais... avec, malgré tout, un typi- 
que accent anglais. Livré avec haut-parleur 
Synthétiseur vocal : 


[synthétiseur vocal 299F 


Synthétiseur musical 


Exploitez pleinement les capacités sonores et musicales 
de votre spectrum! Cette interface vous permettra 
de créer un bruit d'explosion ou de tir laser tout 
autant qu'une symphonie ou le dernier “tube” à la 
mode, livré avec haut-parleur. 
Synthétiseur musical : 


[synthétiseur musical 299F 


(1) 43.28.22.06 


OUVERT DU MARDI AU VENDREDI de 10 h 30 à 13 h et de 15 h à 19 h, LE SAMEDI de 10 h 30à19h 


Crayon optique 


Exploitez pleinement et facilement les capacités graphi- 
ques de votre Amstrad. Avec ce crayon vous dessi- 
nerez encore plus facilement que sur du papier grâce à 
de nombreuses fonctions (cercle, ligne, carré, trait fin, 
gras, aérographe..). Vous pourrez même signer vos 
chefs d'œuvre! 
crayon optique [avec pre en Pons 
pour CPC464664 ..299F 
pour CPC6128.. 299F 
crayon optique [avec logiciel sur 


cassette) : 
Clpour CPC 464 664 


..269F 


extension horloge 


Cette extension va vous permettre d'avoir en perma- 
nence non seulement l'heure à la seconde près mais éga- 
lement le jour de la semaine et la date du jour. De 
plus un système d'alarme programmable vous évitera 
de rater l'heure de l'apéritif ou du film à la T.V. 
Grâce à des piles (non fournies) cette extension 
restera active même lorsque vous aurez arrêté votre 
PCW et gardera en mémoire les instructions que vous 
aurez programmées dans ses 50 bytes de RAM non 
volatile. 

extension horloge : 


Cpour PCW 499F 


crayon optique 


Les capacités graphiques de votre spectrum sont 
indéniables mais peu faciles à utiliser en basic. Grâce 
à ce crayon optique vous aurez enfin le moyen de 
réaliser des chefs d'œuvre. De nombreuses fonctions 
(carré, cercle, colorer, effacer, fin, gras...) vous faci 
literont la tâche et font de ce produit une bonne 
initiation au D.A 0. 

Crayon optique : 


[crayon optique 249F 


COMMENT COMMANDER : Cocher le(s) article(s) désiré(s) ou faites-en une liste sur une feuille à part - Faites le total + frais de port (20 F pour achats inférieurs à 500 F, 40 F de 500 à 1000 F. 60 F pour achat supérieur à 1000 F) 
JEPOSSEDE: [ICPC6128 [CICPC464 CICPC664 CIPCW8256 [CIPCW8512 CISPECTRUM48K [OI SPECTRUM128K 


NOM 


ADRESSE : TÉL CODE POSTAL VILLE 
Mode de paiement : [] chèque / [1 mandat / [] contre-remboursement él: 20 F de frais) — envoyer le tout à : ORDIVIDUEL, 20, rue de Montreuil 94300 VINCENNES. 


Claude LEMOULLEC 


D SNAKES 
'EFFELF 


CLAUDE LE MOULLEC 
REM grsessesesssssnsssssss 
RESTORE 596@:EVERY 26,2 GOSU 
EH 576 
74 MODE 


F4 


1eINE 6,6: INF 
B,SO:INE 3,6: BORDER 6: 
96 FOR lei TO 76:FLOT RND*666, 
RND#466, 12 NEXT 
96 FOR h=%t6 TO -64 STEF -2:FL 
OT 1,h,2:DRAW 466, 144: NEXT 
199 FOR he TD 64 STEF 2:FLOT 
118, Ch-64), 2: DRAW 466, 86+h:NEX 
: 
119 FOR h=2 TO 6 
,212+h,1:DRAW 279, 76+h: NEXT 
126 FOR h=2 TO 6 STEF 2:FLOT 1 
,84+h,1:DRAW 144,12+h:NEXT 

5 FOR h=2 TÙÜ 6 STEF 2:FLOT 1 
,SE8+h: DRAW 466, 146+h:NEXT 
149 FOR h=2 TO 6 STEF 2:FLOT 1 
13, Ch): DRAW 486, 146+h: NEXT 
159 FOR h=2 TO 6 STEF 2:FLOT 1 
,66+h: DRAW 268,764+h:NEXT 
166 FOR h=2 TO 6 STEF 2:FLOT 1 
,196+h: DRAW 136, 268+h:NEXT 


1,6: INE 


STEP &:FLOT 1 


ANNEE 2+ 


Des plates-formes suspendues dans l'espace sont le décor 
de cette chasse aux serpents. Il est à espérer que votre main 
ne tremble pas car la sphère que vous dirigez est toute prête 
à faire le grand saut dans le vide. Un jeu captivant et très bien 
réalisé (Remarquez le déplacement au pixel près de la boule. 
Bonne chasse ! 


TO & 


TO) Fu, 7 
tie MOVE H,. 
J, 4: DÉSW 


1) HOHRSE CEA 
LE 


+CHRS CBS) um 7LE 


FEINT Fs IN 


a xt 


EN Le PRINT 


a; 


12298 


Ye WE 
TO Bree @s FOR gel 


AH 


+ 


FOR fs 


246 


TO ag 


«644 TI) 
4: PRINT 
FLOT &, 


ENTS "ss NEXT: TAGOFE 
LE FEN Les tés too M IL E 
ts WEND es FE 

JJELU C1 : Ê 
à WHILE Te": BtaelEFTE CAS, 1) 


LL NTE) L'été FEINT € 

44e INÉEVS : AB=RIGHTS (AE, LE 
CAS Li ARE: WEND 

ASE IF TS&UIM THEN 486 

A8 TE Te! THEN 55e 

A7 Tes ; 

466 MODE 

FINTIED 

és as FAT NT Pise 
496 FEN Se LOCATE 1, 4: FRINT" 
Li “ie ALI serpents SLE 

d'etre ouverte : 

aie (deme FEU a a ar 
tant,juete avant l'asile defonu 
34% LOCATE pa FARINE" HOUS 
etes invite à ÿ participer . 
Votre terrain de chasse couvr 
ge 4Ë EOFS, Le Eops est une uni 
te de mesure dans la eme gala 
“ie." 

16 LOCATE 1, Lés FRIAT" VOL 
S avez huit FOUNZ2S de munition 
S.Ne les gaspillez pas." 

me LOCATE 1,17: FARINT" Ce 
Jeu 8e joue au JOVESTICE. Les de 
— placements 5e font au pixel 
pres, Atten- tion a l'inertie,F 
our sauter utilisez latouche [ 

FIRE. " 

ie LOCATE 15, 22:PFEN Le FRINT'E 

ONNE  CHANCE " 

34% GOTO 416 

S06 LOCATE 1,24: FRINT STRINGS( 

46, CHRS CE2) ) : PEN Li: LOCATE 11,2% 


autr La 


2 ME < 


2 TG< 


5 F* e] La 


#EJE 


#UK< 
#BL< 


3D SNAKES 


: FRINTUCHARGEMENT EN COURS" 
RUN * 

DIsI1F (50 
L:RETURN ELSE 
THEN Rf tE 


0 Fire + MEN %JN< 


ONE 


HXEE 


CLAUDE LE MOLLL. 


Le SYMEL 


1,6, 6 


118 SYMEBOL 69,0, 66, 64, &é, 64, 6 FACE 


52 à 

126 SYMEOL 164,8, 880, GS, 124, 88, FL 
45, @, 6 

156 SYMEOL 145,6,56,16,16,16,5 TEE 
6,,6 

14% SYMEUDL 168,06, 64, 64, 64, 64, 1 DPF 
24,6, 6 

15% SYMEOL 161,0,124, 84, 124, 64 VD 
y Léé, Et 

164 SYMECL 115,6, 868,60, 68,40, 1 LH 
6 À, 

176 SYMEOL 1186,0,124,16,16,16, #TTe 
16, 6, 6 

196 SYMEOL 169,0,40,84,894,84,8 ME 
4,8, 0 


199 SYMEOL 111,6,124,68, 68,68, 


© o® 


124,6,6 
269 SYMEOL. 
68,6, 

à GYMEOL. 


,38 y SIS) y 40, 
18 F7 FESE 
» DATA FF, 


: F F , FF s F F : 
,FF,FE,86, 


;EB, 66,88, 18 


3,172,84 | | Le FFF 
SYMEOL. 254,48,48,16,8,7,8, CRE“ FE 20, 


700, 69, 


88, c: À s (AE 


246 SYMAOL 255,172,20,8, 16,224 VB 
10,0, 6 

SE SvM BOL 256,6,7,15, 7,8, 0,6, NH 
(a) 

Bo SYMEO!L. 
FA. 

ne. m HAT, 4,0, 0,0, 60,56, TEE 


GE, 60 
DATA 


a AA "AC 
L,H,TE4,7246, 


1E, 08, 
ne, me, 


,& 1 : OF 
Mer, Ge, GE, 6, Ge, LOG WE 
(ETS) &l,iE, 


ne 
51, 
7 y © AE 7@. STSR 
M6, 80,60 TN Me, 
SE DATA 6,6, 00! on 
AA, 06, 6, 0, GE, GO, GA, 
ji. : 1 0,6, 188, 18€ : PO, 00,00, 60, D, 66,00, 
, SG où | va, 96, € ae QL,BE, ©E 
& GYMEUL HO, GE, DE, GE 


SYMEOL. 


SYMECL. 


Le 


SYMEOL 41,0,0,0,0, 5, 7,64, 7 


e F° H < Ge, € LE 


DO, 19, »JJ< 


SYMEOL 44, 


ED (4 “a Ce “a (2 
DO, 66,80, 
99, 


H,60,118,94,84,  %WLE 0, GE 1, 616, CES, CHER, CHE 


HAN 


5/74 DATA 
GTS GAEA, EMEA 
y 0o, 3e 


RE | 


SYMEOL. 


298 


£46, 46 


mn 4 au 


, 240,2 4er, 
416 SYMEOL. 
a 

$ S YMEOL. 


Gestion de la balle: 
techn., des masques: 


un nn uns on 


: 654 FC 3 TO &AIDD: READ 

: A#: FC Hi, VAL CRU HAS) EI NEXT 

É &6é DATA CE, FE a AL,CE, UWN< 
sisi 3,6 ne, 59, 


ie 34 
e] F, a Es : FC y F Fr $ CURE 
496 FOR heroDée TO ROETE: READ x ds, ae F6, 66, GE, 0e , 96,46 
a$sFOEE h : VAL EME + ag) 2 NEXT ae, an, a, 46 FA, aa, Ge, mea, (EL 2 y À Gi a 
560 DATA 66,06%,006, 16,80, 6@0, 0€ RBF< (RTS) 86, 00,06, DO, ZA 

AA, M, El 7 EB,0 6,06, 


44,60, 00, 1,86, 00, &87à DATA AD, AG, A1,S7, 79 SF,SE, APE 
Ma, 19,F7,FE, 86,66, 06,00, 60, 71, DD,21,11,46,68,67,0C5,D5,ES,06, 
FF,FF,ES,66,06, 06,16, AB,SE,64,R68,20,02, DD, 25, 7E, AS, 
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: 16, DD, © À sDD, Ésé y € L 2 4 11, 
LE, Ge, CD, 6, A, DS, DD,6E, 
Li, A6 ,#%,19,Di,CD, 


9,00 


ï DAT 
A, C Ge y BA 


17, 2NMe 


A, 6e 2%, 


H)+CMHRS (1) 
oo 


n)+C 


3 cuis 
CHESS CE) +01 
HHCHRS (2: 
Ga Lroulis 


TO 6:F 


# DL pi NEXT h,g 
506 DATA 1,6,0,6,0,0,0,6,1,1,8 LV 
s1:1,0,60,0,6,60,1,1,1 
16 DATA 1,6,96,0,06,0,0,%,1,1, 


1,9,8,8,0,0, 1, 3, € 


DATA 1,9,0,0,€ 10,0, 9,1,9, FACE 


,1,9,6 
DATA 1,8, 4,4,1,8,60,1,6, 
de ei 
1 Ë pa 1,1,1,8,1,1,1,8, 1,6, ME 
4,6,1,68,1, rs 1,6, 1, 1,1 
144 DATA CP LE 
Et, 1, € &, . Et, 6, €, 61, € 


y D € 


ET, 


b&, EE, 


TS 3€ 4, 
6, 66 


sHssesss 1956 MODE 1:1INE ®, 1: IE Lait 
É NE, Gi INE EE, &: BORDER 1: FAFER 
IT : gs: CLS 
: 18866 WINDOW #1,1,40,1,19:xm26@0 


He oser 246: 5ens l 
BE TC D: READ . Suds Le 


Ce, 


,15,—1 
: serp=42: ba teGs DIM a #JE< 
ul 5 


FVÉE 


ELSE tasïe 
1198 GOSUR LISA EVERY SAGE G MC 


10, CD, SG, ASE, DS, DD, #LL< OSUE So: GOTO 15264 a 5 
39 


1126 REM : : 
1156 REM stableau des scores: 
1146 KREM : ; 
1156 KENM BEIIEEIIIRILEI IEEE 
116 FEN sl 


CATE 4,25: FARINT"Ss 

Ma CHRS& 
CADRE 4, 243 FAIM 
time 


1176 PEN 1: LOCUATE : FRINT 
trs" Ga": GOSUE 2276: GOSUE 
2518 

1186 LOCATE 
p 

1196 PEN es LOCATE ZE, 4: PRINT 

CHERS C1 62 +CHRE (216) : FEN 1: LOCA 

TE 4, és PRINT CHARS C21 6) +CHRS € 

LG) +CHRSE CET 6) +CHES (216) 

29 FLOT 44,12,1:DRAW 44,5%: D 

AW 196,54: DRAW 196, 12: DRAW 44 
4 A 

1219 FLOT 428,12: DRAW 428,52: 0 

FAWN 596,2: DRAW 596,12: DRAW 42 

8,1? 

1226 FOR h=1i2 TO SE: FLOT £#98,h 
sDRAW 4L6,hINEXT h: 

1256 FEN “3 LOCATE 16,23: FRINT" 
D u 

1246 FOR h= TO PSE 


29,25: PRINT tr#;se 


schangement tableau: 
21 THEN GOTO 1: 


ON a BOTO Li 156, 1566, 1576 
586, 1296, 1466, 1416,14706, 1476 
11446, 1456,1466,1476, 1408, 1496 


,1506,1510,1526,1520,1546,1556 


LI talrta-2l 

346 ON tail GOTO 1566, Rd 
6, 1590, 16086, 1616,1626,16270, 164 
H, LOS, lé, 1676, 1689, D de 
,1718, 1726, 1720, 1740, 1750, 176 
(el 

1550 plan (6,5) =%:RESTORE 4176: 
GOSUR 1826: p@arspleïspes4ipz=s 
:GOSUR 21%@4:G60T0 2256 

1566 planté, 4)=2:RESTORE 42%6: 
GOSUER 1826: por: pi=û:pasilipire 
:SOSUE 2156: G0T0 23556 

1576 plan(7,5)=%:RESTORE 4196: 
GOSUE 1826: pôrb:pleés p£s@ipis= 

: GOSUR 21756: G60T0 22756 

1288 plan(é, 6)=2:RESTORE 4256: 


40 


FBKE 


#KL°E 


LME 


#YD< 


*HE< 


2 RH 


FAJE 


WE 


»DL< 


:UM< 


#EN€ 


(50€ SUE 1876: mers pi=0ipa= 
:GOSUE 2136: G0T0 2254 
1596 plan(S,5)=t: HESTORE 4190: 
GOSUE 1826: p4s@:plelipiréipiz 
:GOSUE 21:6:G0T0 5% 
1486 plan(9,5)=2: RESTORE nel 
GOSUE 182%: poid: plié: para: pi 
Es: GOSUB 21%6: GOTO : 
141% plan(ë , 5) 22: RESTORE 4278: 
GOSLIE 1826: pä=@:ples:pastspiss 
: GOSUR :BOTO ES 
L4ëe plan(?,s 2: RESTORE 4286: 
GOSUE 1876: pôr@:ple7:paséspieg 
:GOSUE 21506: GO0OT0 22756 
L4ËS plan (i,S) es RESTORE 4566: 
GOSUE 1826: pé=l@s:pleBgipis@s:pisz 
M: GOSUR 2136: G0T0 ZZ54 
1446 pad ir NESTARE CAES 
GOSUE 3 = 
@: LOCATE 
55e 
1450 RE CARTE 
GOSUE 1 S PESLGIpPE 
#@: GOSUE = | 
1466 NE : ; 
GOSUE 1820: pô SR 
ee: GOSUR 2126: GO0OT0 2256 
1476 SR - CRTSICES 
GOSUE 182@:ph=@i:pli=6:pasil2ipiss 
G:GOSUR 2136: G0T0 ZES6 
1486 plan(9,4)=%:RESTORE 446%: 
GOSUE 1926: p6=1lS:pls6:peséipir 
EG: GOSUR 2156: G0T0 2256 
149% plan(9,3)=%:MESTORE 4416: 
GOSUE 1826:p@=1l6:pl=@:par1i4ips 
#@: GOSUE 2156: GO0T0 2556 
1569 plan(9,2)=2:RESTORE 4436: 
GOSUE 1826%:p@6r1l7:pi=19s:pe=is:p 
Fe@:GOSUE 215064 GO0T0 ZES0 
151% plan(9,1)=£:RESTORE 4456: 
GOSUE 1826:p@=6:pis18:p2=1lé:ps 
=: GOSUR 21:36: GO0T0 2356 
1526 plan (19, 1)=2:RESTORE 4466 
: GOSUEB 1826: pôsti:pliedt:pari9ips 
æ17:GOSUR 21%6: GOTO0 22556 
1526 plan(i®,2)=2:RESTORE 4470 
:GOSUE 1826: p6=1l8:pi=26:pz=6:p 
Be16: GOSUE 2176: GO0T0 2556 
1546 plan(ii,2)r2:RESTORE 44864 
: GOSUE 18264: pa=@:pl=22:pésal:p 
3=19:G0SUR 2176: GO0T0 2756 
1559 plan(i1,%)=2:RESTORE 4496 
:GOSUE 1826:p@4=26:pl=d: pes: P3 
=6: GOSUR 2126: G0TO0 25:54 
1569 plan(12,2)=2:RESTORE 4506 
: GOSUR 1826: pO=2Ts:pl=2Ss:spe=6:p 
3-26: GOSUR 2176: GO0T0 2556 
1576 a 4519 
:GOSUE 1826: p@=@bs:plr24s perse: p 


Arpist 


1, 1 : GOSUB 2130: GOT 0 e 


4250: 
en 


sVFE 


#UH£ 


#FLE 


#HNE 


>YP< 


BQ< 


# AH 


EVIS 


# DE. = 


#FL 


NM 


#YNE 


»TP< 


LES 


re 
0 


es GOSUR Elo: GOTO LES 

1566 plan (ii, ess RESTORE 45% 
LGOSUR 18%6: portés pledepirlés:p 
Lee: GOSUR 1356: GOTO F5 

1666 plan (ii, Hess RESTORE 454 
: GOSUER 1826: posts spledipies7sp 
Ses GOSUR 126: GOTO EEE 


L&ésé plan Ci, Sets RESTORE 45466 
GOSUR 1826s past: plesgs:pietsp 
Sets GOSUER 156%: GOTO 2556 

Léié plan (if, Sel: RESTORE 45764 
sGOSUR 1886 péri piles pied: pE 


06: GOSUE 136: GOTO 2256 

Lé4é plan (lé, Ses RESTORE 4586 
sGOSUE 1866: parles pleñts pie 
pies9s GOSUR 156: GOTO 25564 
LS plan(lé, es: RESTORE 4596 
:GOSUB 1686: po=ts:plietipäir3o:ps 
Æ@: GOSUR 156: GOTO ES 

Léëé plan(lé, é)e%s RESTORE 4646 
ss GOSUR 160: parts piles pieaips 
es GOSUR 2156: GOTO TES 

1679 plan (17, H) ex RESTORE 4616 
GOSUE 1886: pére pler4:pistipi 
= 4. 

1884 plan(i®, 5) 

sGOSUR 1826: paes 7: piles pieds p 
RelEs GOSUE 21%6:G0T0 25564 

Léé plan CE, SH) RE: RESTORE 448% 
sGOSUE 1826: pée@epleb: pie: pe 
hé: GOSUE 2136: GOTO 22564 

1766 plan C1, H)e2: RESTORE 4646 
sGOSUER 1846: péetds pleds: paies plz 
HS: GOSUR ELFG: GOTO 25564 

1716 plan(i®, 43=%: RESTORE 4656 
:BOSUE 1926: pértfs pled:parez4:p 
Bei GOSUE 2156: G0T0 TES 

1726 plan (19, H) en: RESTORE 4666 
sGOSUR 18264: pOREQupletiparE7sp 
eds GOSUER 156: GOTO 2250 

1756 plan (i9, ess: KESTORE 4876 
GOSUE 1826: pésdés piles pERTS:p 
ses GOSUER 2136: G0T0 2556 

1746 plan(19,1)=2:RESTORE 4486 
: GOSUR 1826: p@=@:ple4l:parEiG:p 
eo: GOSUR 2156: GOTO 2556 

1756 plan (£®, 1) #2: RESTORE 4696 
sGOSUE 1826: pOsG: pl=4ts pT=GipE 
m4: GOSUE 136: GOTO 2256 

17864 plan C1, 11e: RESTORE 4766 
:GOSUE 1826: pée@s pleds pieds piz 
41: GOSUR 2126: GOTO 2756 

L/7O UHEÈM sise ssisanserséesteaes 


RATES 


HER 


5 HE 


#GL<E 


+DM< 


#YNE 


RE 


# JTE 


#NEE 


+ MM< 


# QN< 


BF 


+ MQ< 


»JR€ 


1789 REM 


1796 KREM : dessin tableaux : 
1806 KREM x: : 
1819 REM sssssssesszseszs: DEAR 


1826 ERASE a:DIM a(4%,25 
1859 FOR h=i TO 9:READ a 
18946 a1l$Ch)=ERINS (ai, 9) 
18569 NEXT 

1866 FOR hell TO 9:FOR gi TO 9 


Be ve En 


1876 bDISeMIDS Calt (Ch) ,gq,1)sblr4 
AL (bi) 

1986 IF birl 

1896 NEXT g,h 
196Q GOTO Zac 

LPLG axe (ge) + (hi le bye (1l+h 
) —-q 

LFEG ISPARIT,EN po ax, by, &9DG6 


THEN 1916 


LEE CiE=MIDS (als hi,g-1,1)sci 
mL Ce 1) 

1946 IF clel THEN 19&6 

1956 ISFRIT,FN polar, by+11, 8490 
81 

1966 diS=eMIDS (als Ch+1),g,1):di 
ÆVAL (d1s#) 

1976 IF dizl THEN 18996 


1996 GOTO 1894 
2464 READ trsiF tre THEN 2646 


2616 FÜR hei TO tr:READ al,bi 
LAS FEN Es LOCATE al,bis FRINT 
trs trou$: PEN @:LOCATE al,bi+i 
:FRINT trouls 
SGsa NEXT 

SGA IF sptCta)æl THEN 2476 
2456 READ al,bisFEN Z:LOCATE a 
1,b1: PRINT tr$snk$iatal,bi)=1? 
Gralal+i,bi)=l2@sa(al,bli+iiel®e 
Giaal+1i,b1i+1)=1264 

LOGO sxral:syæbli 

2474 RETURN 

2986 KEM 
2696 REM 
2149 REM 
2116 KEM 
124 KEM ssnbssss 
SL IF pozé THEN 2156 
2146 FEN 1:LOCATE 1%, /72FRINT € 
rés CHRE C249) sa (12, 7)=péia(1i,7 
)epéra(li2,6)=pérsa(il,é)=pe 
2156 IF pire THEN 2176 

2lé6@ FEN 1:LOCATE 27,6: FRINT t 
FEsCHRE CS48) :a(27,46)=plia(z8,é 
jæplia(27,5i)=plia(28,s)=pli 
2176 IF paré THEN 219% 

2186 FEN 1:LOCATE 27,15: FRINT 


ni 
8 
as 
… 
® 
ul 


ISPRITEN pocanx,Dy+Li , ROE KE 


trés CHARS (247) :a(27,15)=p£:a(tzs 
>15)=päsa(t?7,1é)i=pair:a(#s, 16)=p 
2190 IF pis THEN 2#16 

22606 FEN 1:LOCATE 12,14: FRINT 

trs CHRE (246) ra (125, 14)=plra(tii 
JL4i=pisaC1?, 15) ep: s (11, 15i=p 


2216 RETURN 
2206 REM : 
REM : 

REM : 
22606 REM : 

2246 REM : : 
2274 FEN 1:1F 
7,23: FRINT n 
N 

2206 IF sct1664 THEN LOCATE 16 
SCSI FRINT nrgs" "sLOCATE 9,2 
BIPFRINT trés; sc:RETURN 

2296 IF sc<£10866 THEN LOCATE 9 
SCSI FRINT nrgs" “eLOCATE 8, 
Es FRINT tr$s sc: RETURN 

23006 IF scr1460608 THEN LOCATE 8 
SPRINT nr$&;" Ms LOCATE 7 
SPRINT trés sc: RETURN 

2316 FEN L:LOCATE 7,24:FRINT n 
F3 "O0OGGO "Us: IF receé THEN RETU 
RN 

2386 IF rect16%@ THEN LOCATE 1 
GO, 24: FRINT nr&s;" ": LOCATE 9, 
BA: PRINT tré; rec: KETURN 

2236 IF rect1664@ THEN LOCATE 
P,R4s FRINT nr$;" ":LOCATE 8 
24 FRINT trés rec: RETURN 

246 IF recr14066% THEN LOCATE 
B,24:FRINT nr$;" Ms LOCATE 
PSS PRINT tr; rec: RETURM 

2556 PEN 6:LOCATE 36,23: FRINT 
CHARS CL) +CHRE (1 45) 

266 IF taïlé THEN 2576 ELSE 
266 

2374 PEN Li LOCATE T6, 2%: FRINT" 
OU LOCATE Zé,2S: PRINT tré; ta:G 
OTO 2566 

2586 FEN 1:LOCATE 35,23: FRINT 
tr; ta: GOTO 2566 

2296 serp=sserp-li: PEN 6:LOCATE 
26,23: PRINT CHRS (1479 +CHRS# (147 
) 

2466 IF serpii® THEN Z42@ ELGE 
2416 

2416 FEN 1:LOCATE #9,27%: FRINT 
tr$; serp:RETURN 

429 PEN l:LOCATE Té,25: FRINT" 

GS" LOCATE 36,23: FRINT tré; serp 


gestion des scores: 


24 IF serp=s£2 OK serp=22 OK 
serp=i? OR serp=£ AND temps<i®z 


42 


» UNE 


#UF< 


+.JG< 


#NHE 


HXJS 


#VP< 


*AQ< 


THEN temps=temps+i 


2446 RETURN 
E45Q 
244664 
E476 
2486 
ADO REP Eu eee Mens es es année 
2960 CALL RAGE, Du 
F2 

S916 FÉINT nr: gheGs sbhetis gg 
sd=® 

292 IF finel THEN tp&=MEMAIN ES 


HS IF JOvYiGielé THEN 126 
SS46 IF JO (éiel THEN sheghais 
sbe@: sdeûs: sq: GOT 2éie 

2936 IF JOVY(G) ES THEN sbegh+is 
she: sde@iegets GOTO 2656 

2366 IF JOV(H)ed4 THEN sgrsquit 
she: sdeû: she: GOTO 2676 

2576 IF JOY(éies THEN sdegdæ+is 
sbes she: sq: GÛTO 2696 

2586 IF sh:é THEN Zéïe 

2396 IF sb: THEN 2656 

2686 IF sg:@ THEN 2676 

2619 IF sdré THEN 2696 

PISE) É s) 


€à 
Soin POEE BAISE, 8: CALL RAGE LC 
ALL BAGAT:POEÉE SAGE, 1: CALL &A 
(RTS HE 


SGA shesh-li mess ses+its BOT 

27866 

H6S6 PFÜÛFE BAISE, ds CALL &AGGEsC 
ALL RAGGE: PORE BAISE, S: CALL &f 
[CIS 

SGén sbhesbh- ls menée sms DUT 

27664 

2674 FOFE RAITE, 4: CALL AGE TC 
ALL RAGGE: PORE RAISE, Lis CALL &A 
LOTS 

26000 sgesg-1lsnen-éssvesd+is GOTO 

27665 

2694 FOFE RAISE, 8: CALL A6: C 
ALL RAGGE:PORE RAISE, Z: CALL &A 
ET 

2706 sdesd-l:xentéäs vases GOTO 

2766 

AS A ON RER EN 

2726 REM : : 

2720 REM test des couleurs : 

2746 KEM : : 

a RE M Cases ere nn ne nt aie 

2760 IF TEST(H, ve DK TEST(H, 
Y)=2 THEN GOTO 2774 ELSE 2524 

2776 KE=INTCCH-1) /16)+1livtess- 
INT éy-1)/16 

2784 IF acnrt,vti=ee THEN £B@@ E 
LSE 2946 

27964 REM ##% la balle tombe #+* 


EU 


2800 ENT 1,166,-4,%:SOUND 5,46 >CL£ 5186 IF shifé THEN sh=%6 É 

,9,9,6,1 5196 FOKE SAISE,1:FOR hei TD 4 XP: 

2010 POÉE BAISE, 2:FOR hey TO 6 :MM£ :CALL RAGGZ:NEXT 

à STEP -E 5266 FOR hi TO sh 
EST (x,h)ir@ AND TEST FAN£ 216 IF xro1d OR yr276 THEN EP CG 

Gu,h-2) 250 THEN POLE RAGGE, 80 46 

2 POHE RAGE, 80F: CALL RAGGE: GOT 2226 FOFE RAIDE, 8: CALL 8466 

O 2846 RAGE: POEE SALLE, 1: CALL 

6 POLE RAGE, LL PORE BRAGGF GLPE 

, MAG: CALL RAGE 


Fr & 
Es =: A 
FE 


hæl TO SéGsNEXT SYRE 22506 FOKE BAISE, 2: FÜR hæi TO 4 3VLE 
56e &A1DE:basba-ils IF baz *DT< :CALL SAGE: NEXT 
& THEN 3666 1266 ShæINT (sh/5):G0TO 2546 2 YME 
2976 FEN 1:LOCATE lé+tba,24:FPRI FU : IF sbr2é6 THEN sbr26 #QNE 
NT CHRS& (147) 3286 FOHE BAISE, 1: FOR hei TO 4 3XP< 
2886 ON dep GÜTO 2896,2940,261 :NVe :CALL &A66%: NEXT 
, 2976 | 3299 FOR hi TO sb 

3 LE DR y£66 THEN 355@ 


per KM nie FOKE SE, 45 CALL RAGE Es C0 FH 
#5 “186: y=égi: GOTO FE él. L. LADOZ: FOKE BAIE, 2: CALL LAS 

# chang de tableau # Abe 
aCkt, VE SL THEN SE FRE 


en (ten 


BALE, Se FOR held TO 4 EVLe 
NERT 
(sl / 2) s GOTO 


2986 CLS Hlstara(nt, VE) se GOSUR  +kET« 

4645 € 

B9AO IF nee AND vessie THEN x De 

mdlérvelégs depæls GOTO 1226 

2976 IF nee AND vestes THEN K #4 

moe vel O6: depess GOTO 1226 

2986 IF KES AND veu THEN x GW 
299: dep Es GOTO 1386 

à AND vise j 

Os depede GOTO 1526 

GG GOTO LEE 

316 BE ## Serpent touche #+ 

RTS L, 46, Se FÛR get TO ES 

A L 98, SINEXT qi x 5 Es 

LL &A1DS HASS POFE RASE, Ses FOR hæ=i TQ 4 %VLe 

: 3 PEN Ge LOCATE gx, ve PRINT +26 : NEXT 

tr$setté Sété SdeINT (se /25is GOTO E546 ME 

Sad CALL RAGSS: GOSUE LESésspEt THE | E ASS IF sgrié THEN sgrié NE 

(tail 2460 FÛRE BAISE, Le FÜR he TO 4 XF 

OS scescdtiés GOSUE LEFE DNA : CALE. LADGE: NEXT 

PO a sx, syv)edia(enxtl,sviegea GLK< HF FOR hæel TO 59 # TG 

(sx, sy+liede a Csx4+l, sy+iiec: GOT HAS IF HEC RTE THEN EST DRE 

D 2966 (a 

0/0 ME  SéSsLs rss See # DL PAG PORE BAISE, 4: CALL SAGE: C EYTE 

2080 REM SVM ALL RAGE: PORE BAISE, 1: CALL &é 

49e KREM : Saut NIV ES (RTS 


“sb=INt 
3 IF sdrié THEN sd=é #VN=E 
3 PÔRE RASE, 12 FÜR h=1 TO 4 XP 
s CALL. SAGE: NEXT 

x FOR hæel TO sd eFGE 
IF Hr&ié ODA veibé THEN CAS DRE 


3549 + EM< 


5 2400 PORE RASE, 8: SEE BANG Es CC UM 
ALL. AGE: FORE RASE, ss CALL &A 
GE 


Fin REM HSE Had ms + #EJ< 
116 REM SYFE HS16 NEXT # QE 
3126 SOUND Æ,2600,45,15,%,2 #DG< ESEA PORE BAISE, S:FOR hell TO 4 34 
FALSE IF ghr@ THEN Ë LH CALL BAGAEENEXT 

14 IF sbr® THEN #FJ£ | SE HSI6 sqeINT(sg/2): 607170 3546 WM< 
F1 IF sdr& THEN JE 2540 WHILE  INÉEYS&< 0e WENDe GOT FN< 
“164 IF sg THEN NL [) 2766 
2176 GOTO 526 FEM< 2856 REM 


En ss se 
pen 
. 
En 
HE 


2566 KEM : 
2576 REM : 
506 KEM : 


Su us ca ss | 


ENT 4,26,5,5: GOUND 
oo, 15,0, 44 FOR t=i TO = 


Fi BORDER &:INE @, 6: INF 1,6: 
INE Bé:INE EE, ie Eps=KEMAIN C2): 
CALL ADS 
; 4 IF scrrec THEN recrsc 
ESA WINGOW 47,5, 26, 1,08 FOR h 
#1 T0 SiLOCATE K?7,1,12FRINT #7 
’ CHRSE CLLIENEXT 

Hé WINDOW #6, 1, 46,1, 8: PAPER 
He, 3: ci 5 ; F: 

Hs WINDOUW #4, 2 
st WINDOW #: 
FER #E, En 

FASO CLS HEICLS Hi CLES Hs CLS 
Hé 

F66 WINDOW #6,6,25,9,° 
#6, 2: WINDOW #S 6 25008, 
FR #5,2: WINDOW #4, &, 6,9, 
Fi #4, 2e WINDOUW #5, ES US, és FA 
FER HE, 

EST CLS HEsCLS #ée CLS 
Hé: Scrt 

F686 PEN GG: FRINT trés: FOR qæi 
TO 6: FOR hell TO Elspeplan(h, gi 


een 


HS: CLS 


5696 IF pré THEN 2726 

766 IF pei THEN LOCATE h+16,9 
:FRINT CHRS (538) 

2716 IF peË THEN LOCATE h+15,g 
2 FRINT CHRS (145) scentecent+2.5 


“720 NEXT h,g:FEN B:LOCATE 1,7 
:ÉRINT" THE MAF. YOU HAVE RUN“; 
INT (ent "x QE YOUR TRIF" 

56 FEN 1:LOCATE 8,25: PRINT" 
ESS ESPACE: TO RUN AGAIN" 
2746 INK D, GzINE 1,#4: INF 
:INE 5,6 
2756 xe200: y=156: 
/2)-4, (y/2)+7,2 
3760 POHE MAÎBE, 8: CALL SABGT:C 
ALL ADO: POÉE MAÎGE, 1: CALL &A 


(STE Re 
2776 ments yes +is GOTO 5846 
2786 POFE RAIRE, 8: CALL RAGE: C 
ALL LARDE:POERE LAIRE, Er CALL KA 
(LE 3 

2790 Kex+ési yves: GOTO 3646 
2906 POEE SALE, 4: CALL RAGE: C 
ALL LAGGE: PFOEE BAISE, Zi CALL &A 
DO 

2916 nmex-édsyey-s GOTO 
2826 POFE &RAILSE, 4: CALL 


CALL RAS, Ci 


2646 
MAGEL SC 


44 


TS 


2 EME 
Ye 


BNP £ 


*BQ< 


2MRE 


JA 


GG Hen-és ves+is GOTO 
2644 IF TESTCx, 
senst+l 

2956 IF sens:4 THEN sens= 

ENG IF INEEYS=" THEN ERAÂSE 
at ERASE plan: ERASE spt: tps=REM 
AINCE) 2: GOTO éa 

2876 ON sens GÜTO 2766 
M, 6e 

RAD UREM cr ses ss US ini ane 


5846 
y)=? THEN sens= 


700,16 


28% REM : : 
HQE REM 2 temps —1 : 
291% KEM : : 
nn RÉM Sos SLA rennes Ne ee 


AURA A LEGER ef 1: LOCATE 1 
JLIPARINT trés CHARS C7 
2946 IF INT (temps/2) 
HEN GOT 2966 ELS£ 
2950 FEN &: LOCATE 
és FRINT 
URN 

19464 PEN @sLOCATE + (temps) 
24: PRINT CHARS (26 
2974 IF tempsra THEM 
2986 ET: RETURN 
2990 E 
464664 REM 
4414 REM 
442 REM 
A4GEQ REM 
44 REM : 
HAS col= INT CRNDEESS +1 
44464 ON col GOTO 4876,46864, 40% 
4, 4166, 4116 
4647 BORDER LsINE 6, 
SINE 2, 262 INE 
4486 BORDER 
INE Z,S6:INE €, 
4896 BORDER Se INE G,SsINE 1,26 
INK 2, @s INK 2, 14e RETURN 
4146 BORDER Les INE GS 1e INE 1,26 
SINE 2, ds INK CE, @s RETURM 
4116 BORDER OLINE 6,6 INE 1,15 
SINE 2, 1@3INE 5, 26: RETURN 
AAC RE Reis Re Ses Et Rs see 
4176 KREM 
4146 REM 
4156 REM 
4166 REM 


4174 DATA 255,259, 2988, 299,292; 


29356 
Fit CCtempes- 
CHARS C2E7) 2 ET: RET 


Fini 


Fi 
1: 
on 
3 
0 
î 
3 
Hi 
ps, 
+ 
9 
F+ 
5 


1: INK 1,4 

2, &: RETURN 

StINE 6,525 INE 
2, Gs RETURN 


42 tableaux 


2995 200 200$ 3 2 
41689 DATA 18,16,20,15,22,16,26 
»17 
D 1 EE 
4199 DATA 6,6,0,255,0,0,0,6,0, 


es 
Le 


4260 DATA 14,12,24,7,20,9 
4216 DATA &1,1,1,751,8,6,0,6,6 


(BAÎPE, 1: CALL &A 


DATA Z4,5,20,7 


DATA 255,255,255,255,2S5, 


255,255,255,6,8 
4546 DATA 16,16,14 


,8,18,6,2?,4 
,19,12,14,16,18,8,22 


6,12,7 


DATA 255,255,295,255,255, 


285 ,256,295, @,9 


Ne De Fe : ?, en , il , 48, 
5,7,20,9,28,11, 


270 n 246,144,15 
3,6,0,0, 
ds baa 16,16,255,255,06, 16, 1 
,16,0,7 

60 A 24,5,24,7,20,7,20,9, 
14,16,14,12,16,12,26,14 

456% DATA 16,16,16,239, 144, 144 
,144,248,0,2 
4516 DATA 12, 


3,26,14,26,17 


ALES 


4520 DATA 255,255,6,255,255,0, 


se 4 Ou 2 y à 
24 DATA 468,224,126, 
24, 16,6,2 

46 DATA 24, 
à DATA 255, . 
sels Sous y 
4566 DATA 12,9,14,8,16,7,168,6, 
19,1%,1€,11,14,16%,16,9,18, 8,76 
5,12,1%,14, LEE, 7, 
<6,6,14,14,16,15,26,8,28,7 
4376 DATA 16,15,18,14,26,12,22 
11,24, 11,26,16,28,9,:06,8,23,1 
4,24, 15,26, 2,28,11,20,2 
406 DATA 255,129,129,259, 16,1 
é lé, 16, 8,5 
4596 DATA 6,16, 12,125,18,164,26, 
Hs © 14,6 
4466 DATA 27,1,8,27,17, 
100,54, 16 
4416 DATA 16,16,16,55,16,16, 16 
y Léo Eu 
A4EG DATA 14,8,16,9,26@,11,2%,1 
sus LE, és, à 
44e DATA 26, 4,127 
y y Eu € 
4446 DATA 19,68,26,7,20,69,22,8, 
4, 16 
4456 DATA 26,2, 16,215, 144,6, 17 
é,144,6,6, 18,4 
44Sé DATA &,246,185,146,146,16, 
LIL, S47,6,1,32,11,74,1€& 
4478 DATA 255,129,155,195,0,1% 
Pal, 200, 032119,8,18,10,16,6% 
4496 DATA 255,255, 195,219, 219, 
195,2558,289,0,2,14,12,24,12, 4 
17328, 
4496 DATA 85,254,85,254,85,254 
,14,16,14,14,8,14,1%, 


a . 
os Ones 


®,17,17 


.73,4,69,11€ 


GET ASC 
109, 20903 © 


“DO: 


*MU< 


3D SNAKES 


18,46,18,14,18,14,22,08,22,1%,22 
116,26,16,26,14,256%,1%,234,16 
456 DATA 16,16,216,129,27,16, 
16,16,9,1,24,17,26,14 

4519 DATA 220,220, 229, 15,255, 
DO y 00 y 2005 y F146,16,7,16,8, 
EU unie Lee 

ii, 16 

ner LA TA £é6,535,97,195,5,6,166 
oo 
45EE DATA 285, LES, US, D 4 es 
LS, oo 2000 19,16,89,14,8,14, 
ble, 7, 16,74 19,11,14,12,16,1%, 
16,12,14,14,22,14,24,15,26,12, 


16,16,124,76,80, 174, 
16,16,9,2,18,  : 15 
4559 DATA & 

,199,112,0, 


,sL41 
en Le 


4560 [réa TA. fe 28, 188, 159 T4 169 Ta 
167,169,2 

19,76,17,24, 

4576 DATA 4,2,2,259,0,2,5,5,06, 


DATA 258,288, 288, 299, 290, 
DS y de va y À Oo Oo To LE 4 y LD y 7 
nes Puy LE SO 10, 30, 16,54, 16, 


ur 
EST | 


45964 DATA 195, 281,221,29,0,167 
1187,187,4,6,20,7% 
4606 DATA 219,219,219,219,219, 
219,219,2858,64,0,284, 15,20, 12,2€ 
” 
4819 DATA 64,0, 0,288, 16, Lé, lé d 
6,%,1,26,11,76,14 
48 DATA 16,24,1%, 
,1,297,0,6,26,14 
AGE DATA 112,89,690,209,17,17, 
17,21,0,2,12,7,26,14,22,1€ 
4646 DATA 24,660, 126, 255,299, 12 
24,6,8,22,6,24, 7,26, 8,28, 
"7,22,8,24,9, 26, 10, 26, 6 
44656 Dos 47,129,129,241, 17 
41,129, 7,0,2,6,19,26,17,26, 5 


151,299,119 


4bbè DATA 247,721,2274,2%8,2%8, 


224,231,247,0,2,18,4,22,11,20, 
4679 DATA 16,29,57,23,57,9,25, 
2,0 e 


23,9,0,30, 

488% DATA 112,11 

112,112 ,112,0,%, 
.19,22,8 

4690 DATA 6,6,4,219,6,4,6,0,0, 

,20,09 

4766 DATA 258,255,195,219,219, 

195,258,2593,0,4,16,7,26,8,18,1 

M,22,16,26@,9@ 


112,119,112, 
SR 


EF 


sULE 


*UM< 


+RNE 


CRE 


EVTé 


SINIRES 


#AVE 


FUWE 


# FM: 
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MIRAGE IMAGER versionT URB O 
enfin le TRANSFERT et la SAUVEGARDE ULTRA-RAPIDES ! 


RECHARGEZ UN PROGRAMME DE 64 Ko EN 14 SECONDES ! 
APRES L'AVOIR TRANSFERE EN UNE VINGTAINE DE SECONDES 
avec la version TURBO du MIRAGE IMAGER 


LE PERIPHERIQUE QUI TRANSFERE et SAUVEGARDE 
100 % DES PROGRAMMES 


LE MIRAGE IMAGER TURBO 


sf » 
"44e, 
11449) 


al 


CPC 464/664 : / D LU 
ne 5 
seulement450 FF 


Port compris 


CPC 6128 : 
seulement 500 FF 


Port et câble 6128 compris 


MANUEL COMPLET de 3000 mots entièrement en Français 


Le MIRAGE IMAGER version TURBO est disponible maintenant. 
Chez nous, la RUPTURE DE STOCK N'EXISTE PAS. 


Ses caractéristiques : 


SAUVEGARDE 64 Ko SUR DISQUETTE EN UNE VINGTAINE DE SECONDES 
RECHARGE UN PROGRAMME DE 64 Ko EN 14 SECONDES ! . , 
TRANSFERT K7 / DISQUETTE ou DISQUETTE / CASSETTE et SAUVEGARDE K7 / K7 ou Fe ln lue PÉRRRRIERAPT PREITRRENR 
DISQUETTE / DISQUETTE de tout programme protége ou non jusqu'à 128 Ko (64 Ko sur 464/664) 8 K RAM et 8 K ROM incorpores 

SAUVEGARDE K7 EN 3 VITESSES (normale, rapide et TURBO) 

TOOLKIT incorporé qui affiche les adresses, INK, PEN et autres details des programmes 
et ecrans, permettant un bidouillage acharne et intensif. 

Grâce au TOOLKIT, contemplez instantanement les resultats des bidouillages effectues ! 
MODE 64 K ou 128 K avec les CPC 6128 

Se branche en 2 secondes ! 

Extrêmement simple à utiliser : gere par menus et l'on presse UN SEUL BOUTON pour 


transterer/sauvegarder/recharger. 


Compresse afin d'utiliser un espace minimum sur disque ou cassette 

Sauvegarde en un seul bloc (pratique pour archivage) 

Compatible avec les ROMS et cartes d'extension et permet aussi de les invalider 

Pour usage personnel 

Comporte un bus d'extension pour raccorder d'autres peripheriques 

Stoppez un jeu à n'importe quel moment, sauvegardez et reprenez-le au même endroit 
TOUS les programmes transferes fonctionnent ! 


VENTE PAR CORRESPONDANCE - Envoyez votre commande (en Français) directement à : 
DUCHET Computers - 51, Saint-George Road - CHEPSTOW NP6 SLA - ANGLETERRE - Téléphone : +44 - 291 257 80 


ENVOI IMMEDIAT LE JOUR MÊME PAR AVION dans le Monde entier (Hors Europe ajouter 25 FF S.V.P.) 


REGLEMENT PAR : 


MANDAT POSTE INTERNATIONAL : 
CPC464/664 : 450 FF 
CPC 6128 : 500 FF 


REDIGER LES MANDATS, etc... à L'ORDRE DE DUCHET Computers. 


EUROCHEQUE où CHEQUE BANCAIRE en livres sterling 
compensable en Angleterre 

CPC464/664 : 49,95 livres sterling 

CPC 6128 : 54,45 livres sterling. 


Si vous êtes pressé, réservez votre commande EN PARLANT EN FRANÇAIS ! 


Téléphonez à Caroline, Jean-Pierre ou Didier au 44 291 257 80. 


DUCHET COMPUTERS & SIREN SOFTWARE 


51 Saint-George Road - CHEPSTOW - NP6 5 LA - ANGLETERRE - Tél. + 44 291 257 80 


EN EXCLUSIVITÉ : DES PROGICIELS SUPER CHOUETTES EN FRANÇAIS POUR AMSTRAD - SCHNEIDER 464/664/6128 


DONNEZ DU CARACTERE à VOTRE IMPRIMANTE DMP 2000 
OÙ TOUTE COMPATIBLE EPSON 
ET UN LOOK PROFESSIONNEL à VOS TEXTES, AVEC 


SIREN PRINTMASTER (150 FF Port compris) 


Le super utilitaire pour imprimantes DMP 2000 et compatibles EPSON 
Pour 150.00 FF, vous recevez le SIREN PRINTMASTER (disquette 3” 464/664/6128) qui vous offre : 


1. Texte en simple, double et QUADRUPLE largeur 

2. Mode inversion vidéo (caractères blancs sur fond noir) 

3. Un choix de 10 fontes de caractères “toutes faites” sur la dis- 
quette ! 

4. Soulignement à gogo 

5. CREATEUR DE CTERES! Créez vos fontes personnelles et 
redéfinissez les fontes existantes (en leur ajoutant des accents 
par exemple) 


6. Impression de l'écran graphique quel que soit le mode 
7. Impression de tout écran texte 
8. Impression de tout écran MODE 0 en 16 couleurs différentes 
9. Tampon de 16 Koctets 
10. Compatibilité avec les traitements de texte 
11. Un emploi très simple à la portée de tous 


SIREN PRINTMASTER, le super utilitaire en Français pour DMP 2000 et EPSON ne vaut que 150 FF port compris 


MODULE 2 pour SIREN 
PRINTMASTER 


Une disquette 3” comprenant 10 fontes supplémentaires à utiliser 
avec SIREN PRINTMASTER, donnant ainsi un total de 20 fontes “tou- 
tes faites” 

MODULE "2; 100.00 FF port compris. 


ET TOUJOURS : 
TURBO 41 6 pour formater les disquettes en 416 Koctets, 


avec son compendium de 20 utilitaires en Français 
TURBO 416 sur disquette 3” 
(464/664/6128) 175.00 FF port compris 


DISCOVERY PLUS l'utilitaire en Français pour trans- 


férer de K7 à disquette les “Speedlock”, “Sans en-tête”, “Conven- 
tionnels”, et les autres programmes protégés 

DISCOVERY PLUS sur disquette 3” 

(464/664/6128) nn. 150.00 FF port compris 


SUPERTAPE 4000 (CPC 464 uniquement), l'utilitaire 


en Français pour la sauvegarde automatique K7/K7, avec 10 vitesses 
au choix 


SUPERTAPE 4000 K7 : 90.00 FF * Disque 120.00 FF 


CADEAU ! Commandez 3 des progiciels ci-dessus et nous vous 
offrons gratuitemnt en CADEAU le progiciel PRO SPRITE (LA FABRI- 
QUE DE LUTINS) valant normalement 125 FF! 

Créez et animez des lutins que vous intégrerez à vos programmes ! 
Un programme de démonstration est inclus pour vous assister. 
Documentation en Français. 


VENTE EXCLUSIVEMENT PAR CORRESPONDANCE + Envoyez vite votre commande (en Français) à : 
DUCHET Computers - 51, Saint-George Road -Chepstow NP 6 SLA - ANGLETERRE - Téléphone : + 44 - 291 257 80 


ENVOI IMMÉDIAT LE JOUR MÊME PAR AVION dans le monde entier 
(hors Europe ajouter 10 FF par titre S.V. P.) 


RÈGLEMENT PAR : 
MANDAT POSTE INTERNATIONAL en francs. 
EUROCHEQUE en livres sterling (vous faites la conversion). 


CHÈQUE BANCAIRE en livres sterling compensable en Angleterre (votre banque fait la conversion). 


Rédiger les mandats, chèques etc... à l'ordre de DUCHET Computers. 


Si vous êtes pressé, réservez votre commande EN PARLANT EN FRANÇAIS ! 
Téléphonez à Caroline, Jean-Pierre ou Didier au 44 291 257 80 de 8h à 19h. 


££'S6 8€ 66 - suoneau) ŒMIYZI 


Ces programmes en Français sont Copyright DUCHET COMPUTERS & SIREN SOFTWARE. Leur diffusion commerciale même partielle sous 
quelque titre ou forme que ce soit et par qui que ce soit est formellement interdite. 


OCTODE 


OCTODE est le nom donné au montage 
proposé, il s'agit d’un mini clavier à con- 
necter sur la prise joystick. Son origina- 
lité réside dans le fait qu'il assure au cur- 
seur de francs déplacements obliques. 
Tout indiqué pour les utilitaires à option 
joystick et technique menus-déroulants, 
il demeure sociable en usage ludique. 
Pour réaliser ce montage, les néophytes 
liront attentivement le texte. 


PRINCIPE DE FONCTIONNEMENT 


Sur un joystick ordinaire, un mouvement 
oblique s'obtient en pressant deux bou- 
tons de déplacement. Par exemple, pour 
atteindre le coin supérieur gauche de 
l'écran, la base de la manette de jeu doit 
presser en MEME TEMPS les contacts 
HAUT et GAUCHE. Mais cela ne peut 
pas fonctionner parfaitement dans tous 
les cas de figure et alors le curseur dévie 
soit vers le haut, soit vers la droite. 


Zig et Puce 


Le dispositif de la figure 1 assure un 
déplacement oblique UNIQUEMENT lors 
d'une action SIMULTANEE sur les con- 
tacts sollicités. Il s'agit d'une fonction 
ET, matérialisée dans notre cas par deux 
diodes et un poussoir (figure 4). 

OCTODE apporte quatre directions (ou 
sens plus exactement) obliques. 


Il faudra donc huit diodes et quatre pous- 
soirs à cet effet. Les deux feux sont pla- 
cés dans la partie supérieure du montage 
et l'un d'eux (F2), est couplé avec la tou- 
che centrale (figure 7). 


REALISATION 


Outillage à rassembler : 
— pinces plates, 

— pinces coupantes, 

— pinces à dénuder, 

— fer à souder, soudure, 
— tournevis. 


Composants à se procurer : 

— 11 boutons-poussoirs, 

— 8 diodes types 1N4148 (D1-D8), 
— connecteur joystick femelle, 

— câble 1 mètre, 9 conducteurs, 

— circuit imprimé (Cl). 


Pour le CI, les néophytes se procureront 
une pochette KIT DE GRAVURE (mode 
d'emploi inclus). 


PREPARATION 


Avant d'implanter les composants, il faut 
les identifier, repérer leurs connexions, 
les mettre en forme. 


— Le CI : tous les trous sont percés au 
diamètre de un millimètre ifigure 10). 
— Le CABLE : comporte neuf fils con- 
ducteurs isolés à relier d'un côté au con- 
necteur, de l’autre au CI (figure 7). Les 
fils seront dénudés (longueurs en mm), 
étamés et repérés (figures 5 et 9). 

— Pour ETAMER un fil, torsader ses 
brins, chauffer cette extrémité et y dépo- 
ser un peu de soudure (figure 5). 

— Le REPERAGE consiste à associer 
une couleur à un chiffre pour chaque fil 
du câble. Exemple : le fil rouge ira d’un 
côté au 2 du connecteur (figure 8) et de 
l'autre, bien sûr, au 2 du CI (figure 10). 


Et ainsi de suite. Enfiler le capot du con- 
necteur (figure 7) sur le câble afin de ne 
pas l'oublier. 

— Le CONNECTEUR : côté soudure, les 
broches (ou sifflets) pourront être éta- 
mées. 

— Les DIODES : plier les pattes. La 
bague indique la CATHODE (figure 6). 
— Les POUSSOIRS : quatre pattes. 
Rien à faire de particulier. 
L'implantation des composants sur le CI 
se fera telle que le montre la vue de des- 
sus (figure 7) et dans l'ordre suivant : 
diodes tout d’abord, cathode bien orien- 
tée, poussoirs ensuite et, pour finir, le 
câble, lui-même relié au connecteur sui- 
vant repérage (figure 8 à 10). 
Soudure : éviter de trop chauffer les dio- 


des qui sont relativement sensibles à la 
chaleur. Couper les pattes (ou queues) 
après soudure (figure 6). 


CONTROLE 


Les diodes sont-elles correctement orien- 
tées, les fils reliés aux bons endroits, les 
soudures toutes faites ? Visser le capot 
sur son connecteur. Coller une plaquette 
(carton ou matière plastique) sous le cir- 
cuit imprimé afin d'isoler les soudures. 
Brancher la prise femelle sur le port joys- 
tick de l'ordinateur. Tester OCTODE 
avec FRUITY-FRANCK ou Z pour les 
jeux, CHERRY PAINT ou AMSTRADIVA- 
RIUS pour les utilitaires. 

Les initiés pourront s'attaquer à la ver- 
sion luxe où l'on remarque (figure 2) : 
S inverseur des communs 8/9 

E ON/OFF de la touche centrale 

T inverseur des feux 6/7 

M touches bas-profil disposées en cer- 
cle sous une membrane 


OCTODE 


PAR ZIG & PUCE 
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Philippe DALIBARD 


RSX CHAR est une extension au BASIC 
permettant de travailler simultanément 
dans les 3 modes 0, 1 et 2 et même de 
créer un mode intermédiaire 0.5, voire de 
nouveaux modes qui, en toute logique, 
devraient alors s'appeler -0.5, -1, -1.5, 
etc. 

La routine donne le maximum de possi- 
bilités et de netteté lorsqu'elle est 
employée en MODE 2 

Cette nouvelle commande est particuliè- 
rement aisée à utiliser. Après l'avoir 
entrée à l’aide du chargeur BASIC (ou 
ensuite par un LOAD), puis initialisée par 
CALL &AO00 afin que le système la 
reconnaisse, on pourra l'utiliser en res- 
pectant la syntaxe suivante 

ICHAR, largeur du caractère, code 
ASCII : 

où la largeur 1 correspond au Mode 2 
où la largeur 2 correspond au Mode 1 
où la largeur 4 correspond au Mode O 
Plus la valeur du premier paramètre est 
grande et plus le caractère affiché sera 
large. |l faudra toutefois s'imposer des 
limites pour des raisons de lisibilité. 

Le second paramètre, qui correspond au 
code ASCII du caractère à afficher sera, 
bien entendu, compris entre O et 255. 
Il convient, enfin, de préciser que le 
caractère s'affichera à l'écran à la posi- 
tion du curseur graphique et non à celle 
du curseur texte. 

Il faudra donc déterminer cet emplace- 
ment à l’aide de la fonction ORIGIN 
(LOCATE ne peut être employé). 
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LISTING 


(Te) 


REX 


FH. 


DATA 


DATA 


DATA 


Dé TA 


DATA 


DATA 


DATA 


LATA 


DATA 


DATA 


DATA 


DATA 


DATA 


CATA 


DATA 


CHAR 
DALIEBARD 


M1,99,46,21,E1,46,CD,D 


DD,46,66,21,60,2I8,5E, 6 
H6,269,09,C5,66,00, 25,1 


FD,CI1,19,F7,11,D9,A6, 


88,86,ED,E6,CD,69,E9, 


.D9,49,66,068,D5, 


CS,F5,FD,CE,66,7E, CD, 
A6, FD, CB, 06,76, CD, 9E, 
FD,CE,66,6E, CD, 9E, A6, 
CE,96,66,CD,9E,A6,FD, 
96,5E, CD,9B,06,FD,CE, 


S6,CD,9E,A6,FD,CE, 66, 


DATA CD,9E,A6,FD,CE, 66,46, 
DATA 9E,A6,F1,C1,E1,D1,2E, 
DATA F5,C5,D5,E5,CD,C9,BB, 
DATA CC,BB,E1,D1,C1,F1,FD, 
DATA 18,AC,C9,28,19,DS,ES, 
DATA 4B,E5,A46,C5,21,06,08, 
DATA 61,66,CD,ED,EBE,CIL,OE, 
DATA E1,26,F@,E1,D1,C9,D5, 
DATA 3E,69,CD,DE,EB,ED, 4B, 
DATA AG,C5,21,606,00,11,61, 
DATA CD,ED,BE,C1,6E,78,B1, 


DATA FO,GE, 61,CD,DE,BH.EL, 


DATA C9,60,006, 6006, 606,00,06, 


CT é  Etér, Een, Eté, Eten, Gen, CEA 


356 
CREATION RSX 

360 

376 MEMORY &9FFF 


LECTURE DES DONNEES ET 


206 FOR lei TO 236: READ Vé:FOK 
E BOFFE+I, VAL CRM) 2 Te T+VAL 
CURHUAUS)ENEXT I 

296 IF TÉs29894 THEN FRINT'ERR 
EUR DATA LI": CHARS (7) : END 

4464 CALL RAGE 

41% 
426 
AC 
44% MODE 2 

45% Jeil:FOR I=65 TO 74:0RIGIN 
1+CI-65) #62, 160: CHAR, J, Li J=J+ 
LiNEXT I 

46% FOR lei TO S:READ CCI)eNEX 
LR: 

47% DATA 77,111,166,161,27 

489 C(é6)=48:FO0R lei TO 6:0RIGI 
NO 1+(CI-1)#8,156: CHAR, 1,C CI): N 
EXT I 

499 C(6)=49:F0R Ii TO 6:0RIGI 
NO 1+0I-1)#16, 206: CHAR, 3, CCI): 
NEXT I 

506 C(é)=S%:FOR Ii TO 6:0RIGI 
NO 1+(I-1)#25,2566: CHAR, 4,C{l): 
NEXT I 

#1& END 


DEMONSTRATION 


*EN< 
2EP< 
eTF< 


:XG<:@ 


A L'OU EST DU NOUVEAU 
Micronaute 


- 9, rue Urvoy de Saint Bedan 
- 6, rue de la Galissonnière 
44000 NANTES 
Tél. 40.69.03.58 


SPECIALISTE AMSTRAD 

Toute la gamme CPC et PCW 
aux prix AMSTRAD 

avec le service MICRONAUTE 


STATION TECHNIQUE 
Dépannage rapide sur place. 
AMSTRAD. ATARI ST. COMMODORE. 
THOMSON. 


SERVICE FORMATION 
+ Locoscript + D Base Il + Multiplan 
Ex. : Locoscript 3 j/1690 F TTC 
(conventions de stages possibles) 
LIBRAIRIE : MICRO APPLICATION 
P.S.I. 
SYBEX 
EYROLLES, etc... 


LOCATION 


SPECIALISTE AMSTRAD PC 
RESERVEZ-LE MAINTENANT : 


PC 1512 SD 
PC 1512 DD 6290 F HT | PC 1512 DD... 819 F HT 
PC 1512 HD 20 9990 F HT | PC 1512 HD 20. 11890 F HT 


DMP 3000 : 1931,00 F HT 
DMP 4000 : 3365,00 F HT 


M SELECTION MICRONAUTE 


* SOFTS 
NOUVEAUTES, arrivages toutes les semaines. 
SPECIALISTE : LORICIELS 
' ERE Informatique 
ACTIVISION 
ELECTRIC DREAMS, 
UTILITAIRES : Traitements de texte 
Fichiers 
Tableurs 
Compta/facturation,… 
LOGICIELS EDUCATIFS 
MASTERTRONIC : 29,90 F 
Nombreux titres. 


NOMBREUX JEUX 8256 


* DIGITALISEUR D'IMAGES 
* CORDON 

* RUBAN IMPRIMANTE 

* HOUSSES 


M INTERFACE TUNER T.V. 


16 chaînes pré-programmables PAL/SÉCAM. 
Prise Péritel - Comp. Canal + - Branchement 
Spécial AMSTRAD 


M vVPC envoi rapide 
Commande : Tél. : 40.69.03.58 
Micronaute VPC 
9, rue Urvoy de St Bedan 44000 Nantes 
Port : 20 F Softs 70 F Machine 
+ 30 F contre-remboursement 


1390 F TTC 


M CREDIT possier CREG immédiat 


Un programme nouveau ne fonctionne 
jamais du premier coup. || y aura toujours 
au moins un ‘‘’bug'’ (ou ‘‘’bogue’') qui 
provoquera un plantage ou un résultat 
que l'on n'attendait pas du tout. 

Il y a deux sortes de bugs : le franc et 
net, du genre ‘’Syntax error in 340" ; et 
puis le farceur, le sournois, qui vous fait 
croire que tout marche bien et qui, de 
temps à autre, vous affiche un résultat 
faux. Non seulement ce bug fantôme est 
parfois difficile à remarquer, mais sa 
localisation va demander beaucoup de 
ruse et de méthode. Heureusement, il est 
plus rare. 

Mais on peut aussi diviser les auteurs de 
bugs (nous) en deux catégories : ceux 
qui programment et ceux qui recopient 
des listings publiés dans des revues ou 
des livres. Et là, les causes d'erreurs sont 
bien spécifiques. De ce fait, c’est la clas- 
sification que nous allons suivre : nous 
parlerons donc d'abord des erreurs de 
recopies, puis des erreurs de conception 
de programme et, enfin, d'un domaine 
commun, la localisation d'un bug caché. 


LES ERREURS 
DE RECOPIE DE LISTINGS 


Il serait trop facile d'ouvrir notre parapluie 
en disant : «Bien sûr ! Ils copient sans 
essayer de comprendre !» ; car même un 
bon programmeur a parfois toutes les 
peines du monde à comprendre un listing 
écrit par quelqu'un d'autre ! Pourquoi ? 
Parce qu'ils ont des façons de penser 
complètement différentes. Alors le 
‘’copieur'" renonce à comprendre la pen- 
sée «contre nature» (la sienne) de l'au- 
teur du programme, et il se met à copier 
«bêtement» en lui faisant confiance. 
C'est humain. 

Premier conseil, bien que cela devrait 
être une évidence, jetez un coup d'oeil 
au texte et au listing avant de commen- 
cer la frappe ; surtout si vous possédez 
un CPC 464. Peut-être y lirez-vous qu'il 
ne s'adresse qu'au 6128 | 
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Les confusions de caractères 


Il est très facile de mal interpréter cer- 
tains caractères, surtout quand un défaut 
d'encrage chez l'imprimeur vient compli- 
quer les choses. Je pense à tout ce qui 
ressemble à une barre verticale : cela 
peut-être un | majuscule, un chiffre 1, un 
L minuscule ou la barre obtenue par 
SHIFT +a commercial. 

Nota : si vous nous envoyez un pro- 
gramme en vue de publication, ne pro- 
grammez qu'en majuscules (sauf pour 
les REM et les textes entre guillemets), 
et pensez à ne pas utiliser la variable | 
ou des noms de variables commençant 
ou se terminant par cette lettre. Sinon, 
attendez-vous à recevoir beaucoup de 
courrier. 

Autres confusions classiques, le chiffre 
0 et la lettre O, 5etsS, le point et la vir- 
gule, les deux-points et le point-virgule, 
le G minuscule et le chiffre 9. Ajoutons 
à cela quelques étourderies dyslexiques 
courantes après 23 heures 30, du genre 
slash et anti-slash (les touches sont voi- 
sines...), < et >, M et W en 
minuscules. 

Autre cause d'erreurs fréquentes, les 
espaces. (ou blancs) en trop ou en 
moins : lorsque l'on veut indiquer qu'une 
variable chaîne R$ est ‘'vide’’ ou nulle, 
on écrit R$ =", c'est-à-dire deux guil- 
lemets consécutifs. Si vous mettez un 
espace entre eux deux, ca change tout |! 
R$ n'est plus vide, elle est de un carac- 
tère. Pour indiquer que R$ =un blanc, il 
est plus prudent de programmer 
R$ = SPACES$(1). Autre cause heureuse- 
ment plus rare : certains programmeurs 
(qu'il faudrait battre !) ont remarqué que 
le blanc est parfois un caractère de sépa- 
ration en BASIC ; alors, dans des lignes 
de DATA, il mettront un espace en guise 
de virgule ou dans un ordre PRINT pour 


Michel ARCHAMBAULT 


remplacer les points-virgules. Ca marche, 
mais si le recopieur oublie un de ces 
blancs, c'est la catastrophe assurée. 


Les adaptations malheureuses 


Pour rendre la recopie moins «bébète», 
il est humain d'apporter çà et là des peti- 
tes modifications «sans importance», 
histoire de personnaliser un peu ce que 
l'on tape. Très bien, mais de nombreux 
pièges vous guettent. 

Premier cas, les noms de variables. Afin 
de rendre le listing plus clair, l'auteur a 
utilisé des noms de variables longs, par 
exemple RAPPORT = A/B, et comme ce 
nom revient souvent, vous décidez que 
RAP est bien suffisant. Oui, mais en 
poursuivant la frappe le lendemain, voilà 
que vous l'appelez RAPP... Autre cas 
avec par exemple DIRECTION = 4, trop 
long ! Vous tapez DI = 4. Et voilà un futur 
‘’Syntax error'’ ; parce que DI est un mot 
BASIC, peu usité certes, mais c'est un 
‘’mot réservé'" (voir la liste des ‘mots 
réservés" dans votre manuel). 

Une autre aventure ? Les numéros de 
lignes. Un programmeur qui tient à con- 
server son standing fait des sauts de 
numérotations à des multiples de 100 ou 
de 1000, à chaque fois qu'il aborde une 
nouvelle étape. Ça fait ‘’rangé'’ et net, 
surtout quand ces numéros de lignes 
«tout en zéros» sont des REM expliquant 
ce qui suit. 

Oui, mais il y a le copieur qui se dit que 
«AUTO c'est pas fait pour les chiens» et 
aussi que «Les REM ça ne sert à rien, 
donc je saute.….». Mais il n'empêche qu'il 
transcrira scrupuleusement... IF N=0 
THEN GOTO 800. Des GOTO qui iront 
se perdre dans les marécages... 

Vous pouvez vous dispenser du texte de 
REM de la ligne 2000, mais tapez au 
moins 2000’, sinon gare au ‘‘LINE DOES 
NOT EXIST IN 340. 


les impondérables 


Là, c'est de la faute de l'auteur du pro- 


gramme qui «aurait dû prévoir» que l'on 
Va lancer son programme «à chaud» et 
non pas après un CTRL + SHIFT +ESC. 
En effet, il y a des choses mémorisées 
qui ne s'effacent pas par RUN ou par 
NEW ; c'est le cas de MODE, des cou- 
leurs de l'écran, des SYMBOL et des KEY 
DEF. Pour illustrer cela, voici deux gags 
authentiques. 

— Gagn° 1 : ce programme débute par 
un GOSUB qui définit des caractères par 
SYMBOL, donc précédés par. un 
SYMBOL AFTER. Premier essai, impec- 
cable ! Tout content, on le relance par 
RUN. Aussitôt, plantage avec ‘‘Improper 
Argument in 30‘ ! En 30, il y a le 
GOSUB qui, lui, débute par SYMBOL 
AFTER 64 et, comme le précèdent, 
SYMBOL AFTER.64 est resté actif, ça 
plante. Faire toujours précéder un 
SYMBOL AFTER par un CALL &BB0O4 qui 
élimine les précèdents. 

— Gag n° 2: cet utilisateur de CPC 
couleur détestait programmer en lettres 
jaunes sur fond bleu foncé. Il commen- 
çait toujours une saisie de listing par 
INK 1,0:PAPER 2:CLS 

donc en lettres noires sur fond bleu ciel. 
C'est effectivement plus net et reposant. 
Oui, mais le long programme recopié 
commençait par PEN2:CLS... Sitôt lancé 
par RUN écran est vide et bleu ciel ; ESC 
et clavier apparemment inactifs ; affole- 
ment ! Reset. Normal avec PAPER et 
PEN de la même couleur... 


Est-ce tout ? 


Cette liste de ‘‘gaffes'’ n'est pas exhaus- 
tive, hélas. L'auteur s'est inspiré de plu- 
sieurs années de «courrier des lecteurs» 
et d'animation de club informatique, pour 
recenser les cas les plus classiques ou 
les plus ‘’curieux''. A ce propos, si vous 
êtes complètement bloqué malgré moult 
vérifications, n'écrivez pas simplement 
«J'ai retapé très fidèlement le listing de 
votre programme TRUC et il ne marche 
pas. Dites-moi où est l'erreur». Ce ne 
sera possible que si vous joignez votre 
listing ou, à défaut d'imprimante, une 
cassette. Avec un enregistrement, le dia- 
gnostic sera quasi immédiat, d'où une 
réponse rapide. 


LES FAUTES DE PROGRAMMATION 


Comme nous l'avons dit au début, il y a 
l'erreur ‘‘immédiate'’, genre ‘'Syntax 
Error'’ ou ‘‘Improper Argument”, et l'er- 
reur ‘‘fortuite'’ qui survient un jour dans 
un programme qui tourne depuis long- 
temps et ce à la suite d’un concours de 
circonstances que le programmeur 
‘’aurait dû prévoir’” (comme pour la fusée 
Ariane, mais un logiciel est quand même 
vendu moins cher...). 

Tout cela ne veut pas dire qu'un bug se 
traduise toujours par un arrêt-plantage : 
il peut aussi fournir des résultats absur- 
des qui, pour l'instant, ne provoquent 
pas de plantages. 

Il n'est pas possible de faire une liste de 
toutes les erreurs possibles en BASIC. 
Ok ? En revanche, il va être bon de 


dénoncer celles qui sont au Hit Parade ; 
et qui d'ailleurs s’y accrochent..… On 
commencera donc par l'éternel grand 
champion toutes catégories : 


Les initialisations de variables 


Contrairement à la plupart des langages, 
le BASIC initialise toute variable incon- 
nue à zéro. Faites PRINT ZZ, réponse O ; 
PRINT ABC$, réponse chaîne vide (‘‘‘’). 
Alors, on en prend l'habitude et pour 
démarrer un comptage (ou ‘‘incrémenta- 
tion’) on écrit simplement K=K+1. 
Donc, au premier passage, K=0+1 et 
ainsi de suite. Supposons que K ait 
atteint la valeur 15. Puis le programme 
est amené à repasser par là pour de nou- 
veau comptabiliser de 1 à... Si on n'a pas 
pris la sage précaution de réinitialiser par 
K=0, le deuxième comptage va démar- 
rer à 16! 

Même remarque avec le classique 
WAHILE R$="":R$ =INKEYS$ :WEND 

au premier passage l'ordinateur attend 
que vous pressiez une touche. Vous 
pressez N, donc R$ =''N'", on ‘‘passe’’ 
le WEND. Deuxième passage par cette 
ligne : R$ vaut toujours ‘’N’’, donc ‘‘pas- 
sage’ du WEND sans attente d'un 
INKEY$ au clavier ! Vu ? Il aurait suffit 
juste avant le WHILE de programmer 
R$=""" 

Une autre source d'ennuis est notre man- 
que d'imagination pour les noms de 
variables ; toujours les mêmes lettres qui 
reviennent, d'où risque d'homonymies 
catastrophiques. Exemple : vous avez 
programmé un compteur par 1=1+1. 
Votre programme fonctionne très bien :; 
puis, un jour, vous décidez de le complé- 
ter par un nouveau sous-programme qui 
affiche un message à l'écran. Pour avoir 
le temps de le lire, vous mettez la clas- 
sique boucle d'attente de trois secondes 
FOR 1=1 TO 3OO0:NEXT 

RETURN et le cycle repasse par le comp- 
teur qui saute ainsi à 3002. Surprise. 
Deux conseils : 

— Initialiser vos variables 
(K =O:R$ = ‘""") même si cela semble ne 
servir à rien (pour l'instant...) 

— Méfiez-vous des homonymes en 
noms de variables, tout particulièrement 
lorsque vous retouchez un long pro- 
gramme ancien. Adoptez des noms à 
consonnances martienne ou vénusienne, 
du genre ZZZ où WYW ; c'est plus sûr 
que |, N ou K... 


Nota 


Pour les cas épineux, je vous recom- 
mande le programme ‘‘Références croi- 
sées'" de TO MINH TRI, publié dans CPC 
n° 7 page 65 : il liste les variables par 
ordre alphabétique avec les numéros de 
lignes où elles figurent. Une pure 
merveille ! 


Les farces des valeurs nulles 


Diviser un nombré par zéro donne un 
résultat infiniment grand, un non-sens 


pour un ordinateur qui réplique par ‘‘Divi- 


sion by zéro in..….”". Donc, à chaque divi- 
sion, posez-vous la question de savoir s'il 
y a une ‘‘chance”’ pour que le diviseur 
soit nul. Exemple classique À = B/(C-D). 
Même si la probabilité pour que C = D est 
infime (donnerait division par zéro), dites- 
vous que cela arrivera le jour où vous 
ferez une démonstration de votre pro- 
gramme. (=loi de MURPHY ou de 
‘‘l'emm... maximum’). il faut prendre 
ses précautions 

CD=C-D:IF ABS(CD)<O. 001 
CD=0.001 : 

A=B/CD 

Autre cas, les paramétrages de comman- 
des BASIC, par exemple LOCATE 
12,Y:PRINT A$ 

Il est sage de faire précéder par 

IF Y<1 THEN Y=1 

un risque associé est celui de l'OVER- 
FLOW avec les nombres entiers : 

N% = A/B est dangereux. Ecrivez plutôt 
IF ABS(A/B)< 32767 THEN N% = A/B 


Les INPUT et les DIM 


Ces causes d'erreurs arrivent en troi- 
sième position. Ce sont des sujets assez 
vastes et nous leur avons déjà consacré 
récemment deux articles : ‘’La gestion 
des réponses’ dans CPC n° 19; ‘’L'ex- 
ploitation des tableaux DIM'' dans CPC 
n° 21. 


La logique illogique 


THEN 


Les fonctions ‘‘logiques'’ sont les 
suivantes : ; 
IF... THEN, ELSE, AND, OR, NOT et 
XOR. | 


XOR( = OÙ exclusif) est d'un emploi peu 
fréquent. Ces fonctions ont un fonction- 
nement TRES STRICT, mais qui ne génè- 
rera jamais de code d'erreur si elles exé- 
cutent tout autre chose que ce que vous 
aviez prévu. C'était à vous de ne pas les 
employer à tort et à travers. Hélas, c'est 
facile. 


Le risque:initial est de traduire en BASIC 
une pensée en ‘langue française’ 
exemple «j'accepte les réponses ‘‘’O'' ET 
“OU” comme valables», alors le ‘‘débu- 
tant’ programme 

IF R$=""O"" AND R$="'OUl'"" THEN 
GOSUB 5000 

ce qui est ‘‘logiquement'’ impossible ; il 
fallait écrire OR et non pas AND. 

Mais la championne des gaffes classi- 
ques consiste à mettre plusieurs ‘‘’clau- 
ses'” (séparées par des :) sur une même 
ligne, en oubliant ce principe essentiel : 
si un |F n'est pas satisfait, les clauses 
suivantes ne sont pas lues par BASIC. 
IF.N>5 THEN P=10:A=B*2 

lci avec N=3 le A=B*2 n'est pas exé- 
cuté ; après un |F non vérifié BASIC 
passe immédiatement à la ligne sui- 
vante ! Sauf s’il y a un ELSE. 

IFN>5 THEN P=10 ELSE P=20 

Un ELSE est très catégorique ; passé 
cette ligne, on aura P=10 ou bien 
P = 20. Pas d'autre alternative possible ! 
On peut mettre un IF après un ELSE, 
mais alors attention à votre 
raisonnement : 
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IF N>5 THEN P=10 ELSE IF N<3 
THEN P = 30 

Cela se traduit par la ‘’table de vérité” 
suivante 

N P 

1 30 

2 30 

3 ? 

4 ? 

5 ? 

6 10 

7 10 

A méditer. 

Une condition non vérifiée prend la valeur 
zéro, vérifiée elle vaut -1 et non pas 1. 
Essayez PRINT (12=2*6), réponse -1. 
Remplacez 12 par 13, réponse zéro. 
Supprimez les parenthèses, ça marche 
encore. 

C=(12=2*6) 

IF C THEN GOSUB 3000 

Ce IF C signifie ‘’si C non nul”. Vous 
pouvez le remplacer par IF C=-1, mais 
pas du tout par IF C=11.. 

Dans le cas contraire, vous avez le choix 
entre 

IF C =0 THEN GOSUB 4000 ou IF NOT 
C THEN GOSUB 4000.IF NOT C signifie 
‘’si C n'existe pas, s'il est nul” 

Pour combiner dans une même ligne des 
AND et des OR, il ne faut pas hésiter à 
utiliser des parenthèses. Même si elles 
ne servent à rien, c'est plus sûr et le lis- 
ting est plus clair à lire. 

IF (MARO$ = '"AMSTRAD'') AND 
(TYP=-464 OR TYP=-664 OR 
TYP=6128) THEN PRINT ‘‘c'est le meil- 
leur BASIC’. 

Un ‘test’ par =, >, <, est donc noté 
par -1 (vrai) ou par zéro (faux). Ceux qui 
aiment les maths s'apercevront alors que 
AND est l'équivalent de * et OR l'équi- 
valent de +. 

Avec de l'aspirine à portée de main, vous 
pouvez imbriquer plusieurs niveaux de 
parenthèses avec des OR, AND, NOT, 
mais alors prenez la précaution de tes- 
ter votre ligne logique par un petit pro- 
gramme d'essai (commençant par des 
INPUT) et ce afin de vérifier que la ‘’table 
de vérité” obtenue correspond bien à vos 
desiderata. 

Attention à la fonction XOR ! Super res- 
trictive : (A=5 XOR B=1) n'est vraie 
(-1) que si l’un seulement de ces deux 
tests est vrai. Faux si ces deux égalités 
sont vérifiées (ou aucune des deux). 


Les sorties de boucles 


Supposons une boucle FOR NEXT qui 
débute en ligne 300 par FOR N=1 TO 
15 et qui se termine par 460 NEXT. En 
ligne 350, un IF permet de sauter la suite 
du ‘‘traitement'" et de passer au N sui- 
vant. La syntaxe normale est 

350 IF....THEN GOTO 460 

alors la grosse bourde (hélas classique) 
serait d'écrire 

350 IF... THEN NEXT 

En effet, quand BASIC rencontre un 
FOR, il repère d'abord où est son NEXT, 
ici en 460. Il ne verra pas celui de la ligne 
350 ‘’masqué derrière'’ un IF. Alors si le 
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BUG, OU ES-TU ? 


IF le conduit à ce NEXT en 350, il risque 
fort d'y avoir du vilain. 

Si, en ligne 380, vous prévoyez un cas 
permettant de mettre fin à cette boucle, 
donc avant que N atteigne 15, la pire des 
choses serait d'y mettre un GOTO 470. 
En ce cas, il suffit d'écrire : 

380 IF... THEN N=15:GOTO 460 

et l'on sort PROPREMENT, sans risque 
de choc en retour. 

Idem pour une boucle WHILE WEND. On 
met la variable à la valeur attendue, et 
GOTO le numéro de ligne du WEND. 
Idem pour les sous-programmes : pour 
une sortie prématurée ne pas faire 
IF... THEN RETURN mais THEN GOTO 
le numéro de l'UNIQUE RETURN. 

Si, dans une boucle ou dans un sous- 
programme, vous désirez faire un détour 
vers l'extérieur, il est formellement inter- 
dit d'opérer par GOTO ! Uniquement par 
GOSUB. Sinon c'est l'affolement des 
‘’pointeurs'”. 

On ne peut pas imbriquer des boucles 
WHILE WEND (dans le BASIC des CPC). 


LES ERREURS DU PASSE 


Ces erreurs ont deux causes : 

— Présence de lignes obsolètes que l’on 
a oublié d'effacer, par étourderie. Soit 
des lignes dont on a changé le numéro 
pour les placer ailleurs, soit des lignes de 
tests que vous aviez insérées çà et là ; 
du genre 

629 PRINT N ;A$:STOP 

(utilisez toujours des numéros de lignes 
se terminant par 9: plus faciles à 
repérer...) 

— On s'est trompé de version ! La pre- 
mière chose à faire, avant de modifier un 
programme, est d'en changer la date 
dans le REM de la ligne 10. Et comme 
vous avez pris la précaution (?) d’enre- 
gistrer votre logiciel vedette de 13 kilo- 
octets sur quatre disquettes différentes, 
votre dernière modification porte en fait 
sur l'avant-avant-avant dernière ver- 
sion. Alors. 


LES LOCALISATIONS DIFFICILES 


Votre programme ne plante pas, mais 
conduit à des résultats farfelus. Donc le 
bug peut être n'importe où ! Le premier 
travail consiste alors à localiser la zone 
du listing qui est coupable. Par exemple, 
ce passage de 20 lignes que l’on réduira 
ensuite à une. Il faut jouer au détective. 
— Insérez des lignes-mouchard, comme 
629 PRINT N;A$:STOP 

et vous redémarrez en tapant CONT. 
— Testez en mode direct des sous- 
programmes. Par exemple 
A=4:X=0:A$ ="'Paul'':GOSUB 3000 
Et là, toujours en mode direct, interrogez 
par PRINT certaines variables. 

Autre variante des ‘données fixées’’ 
NB=5;B$ ='‘JEAN'':GOTO 540. 

et vous récupérez les résultats plus bas 
dans une ligne-mouchard. Remarquez 
qu'il ne faut pas utiliser RUN qui annule 
toutes les variables en cours, mais GOTO 
ou GOSUB qui les conserve. 


Deuxième degré : Vos mouchards vous 
donnent partout des indications norma- 
les, donc le bug n'apparaît que pour cer- 
taines valeurs de la variable M. Vous ne 
voyez pas pourquoi, mais le fait de con- 
naître les valeurs coupables va vous met- 
tre sur la voie. 

1 FOR M=-10 TO +20:GOSUB 5000 

2 IF LEN(B$)>5 THEN STOP 

3 NEXT:END 

Et on lance par GOTO 1 

Troisième degré : ça y est ! Vous avez 
identifié ce qui provoque l'erreur, le 
groupe de lignes où le mal se développe, 
mais vous ne comprenez toujours pas 
pourquoi. En effet, il s’agit d'un passage 
très complexe avec des IF... THEN 
GOTO (ou GOSUB)...ELSE GOTO...etc. 
Par où passe le programme ? Les armes 
sont TRON et TROFF (abréviations de 
TRACE ON et TRACE OFF). 

TRON va faire inscrire à l'écran les numé- 
ros de lignes où passe le programme 
(entre crochets). TROFF annule TRON. 
Mettez très peu de lignes entre TRON et 
TROFF car un écran est vite rempli ! 


Le final 


Ça y est le bug est mort, ça marche. Sur- 
tout ne sauvegardez pas ! Votre pro- 
gramme en RAM est un champ de 
bataille. Notez sur papier la fameuse ligne 
corrigée, puis NEW ! LOAD ; correction 
de la ligne et enfin SAVE. Vous voyez 
pourquoi ? 


CONCLUSION 


Le bug, c'est le sel de la programmation. 
Que ce serait triste si tous les program- 
mes fonctionnaient toujours du premier 
coup |! Que c'est bon un bug farceur qui 
joue à cache-cache pendant des heures, 
que l'on traque en se prenant pour 
Columbo.….. Et puis çà dispense les pro- 
grammeurs de s'acheter des logiciels 
d'aventures à 270 francs la disquette. 


URGENT !!! 


CREER 
Occasion à saisir sur Bor- 
deaux, livré clés en mains, 
point de vente micro agréé 
COM- 


AMSTRAD, ATARI, 
MODORE. 


C.A. actuel minimum : 
300000 F/mois. 


Pour tout renseignement 
Tél. 56.91.15.81 


LE PREMIER ÉDITEUR DE LOGICIELS UTILITAIRES 


NOUVEAUTÉ 
ZENITH : Lo capacité de stockage des 


disquettes 3 pouces est au maximum de 
178K0o. Il est donc difficile de stocker plus 
de 4 programmes par faces. Ce pro- 
gramme de compactage réduit les pages 
de présentation ainsi que les program- 
mes (Basic ou Binaire) er un minimum de 
place. Par exemple si vous possédez un 
fichier organisé comme suit: 


LOADER-BAS  1K z ECRAN-BIN 3K 
ECRANBIN  17K—æ | N JEUX-BIN 10K 
JEUX-BIN 42 Kk M 


Le loader-bas aura disparu et vous 
aurez gagné 47 Ko de place libre sur 
votre disquette. 


ZENITH : DISC : 250 F TTC 
NOUVEAUTÉ 


L’INTERPRETE : la majorité des 

logiciels existants sont dans la langue de 

Shakespeare, et l'utilisation n'en est que 

plus difficile (Utilitaires - Jeux d'aventures 

Jeux... Ce programme vous permet de 

traduire en français ou en toute autre 

langue vos logiciels préférés. La démar- 

che est automatique et ne requiert au- 

cune connaissance particulière. 

- Mapping du disque 

- Edition des secteurs 

- Acceptation de jokers 

- Traduit plus de 500 mots à la fois 

- Repère automatiquement sur la 
disquette les textes à traduire 


L’INTERPRETE : 
DISC : 290,00 F TTC 


NOUVEAUTÉ 


TRANSLOCK II permet de récu- 
pêérer les prograñhmes et les présenta- 
tions avec leurs encres respectives. La 
relocation est automatique, et tous les 
renseignements nécessaires sont affichés 
en permanence à l'écran. 


TRANSLOCK II : 
DISC : 225,00 F TTC 


Label zeni-qualité : 
ECHOSOFT : DISC 395 F TTC 


NOTRE CATALOGUE EST DISPONIBLE CHEZ | 


Numéro 1 au hit parade des utilitaires : 


———— NOUVEAUTÉ 


ACCESS ll : N'étant pas le seul de sa 
génération, ACCESS Il vous fournit des 
plus en matières d'accès direct. Sa facilité 
de mise en œuvre ainsi que sa rapidité 
de traitement transformeront véritable- 
ment votre CPC en un ordinateur profes- 
sionnel. Une boîte à outil complète pour 
vous aider à gérer votre disque est incor- 
porée au programme. 


- Editeur - Menu d'aides 

- Copieur - Menu d'exemples 
- Formateur —: Démonstration 

- Exploreur - Etc... 


ACCESS I! : 
DISC :370,00FTTC 


—————— NOUVEAUTÉ 
BOURSE 2000 : 


- Croissance annuelle 

- Evolutions et moyenries mobiles 

- Les points et les figures 

- Les hausses et les baisses moyennes 
- La genèse 

- La situation 

- Gestion sur 3 ans 


BOURSE 2000 : 
Disc CPC : 450 F bientôt sur PCW 
et PC 


ET TOUJOURS : 


HERCULE : Disc 250 F TTC 

- Le complément de HERCULE (version 
3.0) est disponible contre 80 F + 20 F 
de port 


Adresse : 


VOTRE REVENDEUR OU CHEZ ESAT CONTRE 20 F 


EN TIMBRES (Remboursés à la première 


commande). 


| Nom : 


Logiciels commandés : 


MEPHISTO : transfert automatique 
de cassette à disquette 

CASS : 165 F TTC 

DISC : 205 F TTC 


TAPE LEADER : ce logiciel duplique 
vos bandes magnétiques avec un choix 
de 10 vitesses de sauvegardes. Durant la 
duplication, les renseignements sont affi- 
chés sur l'écran. 


CASS : 175 F TTC 
DISC : 205 F TTC 


VIEW TEXT : CASS 135 F TTC 


ET NOS ACCESSOIRES : 


STYLO OPTIQUE : 6128.415F 
8256 :830F 
PC :990F 
SCANNER : 890 F 
TUNER TV : 1500 F 
MULTIFACE II : 600 F 


Notre SOFT PSYCHOTEST : 
DISC : 135 F TTC 
CASS : 100 F TTC 


Abonnements 
MEPHISTO MAGAZINE 
(Routines de transferts) 

330 F 12 N° - Port gratuit 


BON DE COMMANDE 
| Prévoir 25 F de port + 20 F pour le contre remboursement. | 


Prenom; 


££' S6 8€ 66 - suoneai] OXYZI 


ARCHE ! 


“Comment réaliser et réparer 
tous les montages 
électroniques 


Un prodigieux ensemble d’in- 
formations et de conseils 
pratiques réunis pour la 
première fois ! Il vous 
permet de vous atta- 
= quer en toute sécu- 
rité aux montages 
et aux réparations 
‘ les plus variés. 


De l'interface qui 
transforme votre Minitel en 
modem à la réalisation d’une 
alarme de voiture, vous trouve- 
rez une centaine de montages 
insolites, astucieux, passionnants 
et 100 % efficaces (ils sont tous 
testés !). 

Quant aux réparations (radio, TV, 
Hi-Fi...), elles n'auront bientôt 
plus de secrets pour vous, grâce 
aux nombreux conseils et trucs 
pratiques. Deux solides classeurs 
Répondeurs téléphoniques à feuillets mobiles font de cet 
Stroboscope ouvrage un outil de travail quoti- 
… et des dizaines d’autres montages | djen facile à consulter et à utiliser. 


EXTRAIT DU SOMMAIRE 


1344 pages + 45 circuits sur mylars + 2 volumes 21 x29,7 cm + Lexique 
des termes techniques et symboles + Lexique technique français-anglais 
° Notions essentielles : composants électroniques, acoustique... + Modèles de 
montages : musique électronique, radio, micro-informatique, électronique auto, 
haut-parleurs. + Dépannage : télévision, audio/hi-fi, diodes, transistors, 
thyristors et triacs, circuits intégrés + Tableaux de caractéristiques + Réglemen- 
tation : perturbations radio-électriques et systèmes d'antiparasitage + Nouveautés 
techniques : équipement de l'atelier, informatique... + Adresses utiles. 


RESTEZ “BRANCHÉ La Garantie WEKA : 
EN PERMANENCE “Gatisfait ou Remboursé” 


Grâce à des compléments tri- | Vous ne prenez aucun risque en commandant 
mestriels de 150 pages, vous | l'ouvrage. Si vous estimez qu'il ne correspond 
découvrirez les nouvelles tech- | PAS complètement à votre attente, vous con- 
ï : servez la possibilité de le retourner aux Editions 
Mie ne ph pe Weka et d'être alors intégralement remboursé. 
t à réali Cette possibilité vous est garantie pour un délai 
ce de de 15 jours à partir de la réception de l'ouvrage. 
P La même garantie vous est consentie pour les 

demande). envois de compléments et mises à jour. 


VOTRE CADEAU GRATUIT. 


. Vous recevrez une pochette de 6 tournevis de 
précision de qualité ‘‘horloger”. Ce cadeau 
vous restera acquis même si vous décidez 

de renvoyer l’ouvrage après examen. 

* Offre valable jusqu'au 15.7.87 


SAUAMAGOMPUTENS, 
9 Fue Charlot 93700 DRAMY 

Du Mardi au Samedi 

[Class mue 
SAV Miro ÉOUTES MATQURS service rapide 
CPC 464 couleur 290F 
Éd CPC 464 nonochrone 1990 F 
: CPC CDS couleur 390 
CPC EDS menoctrone 299 F 
Cadeau SYNC : 1 joystick + 4 Jeux avec chaque appareil 
Disc 3": 30 Funite Joystick Quickshot? : 65F 


Grand choix de Logiciels a partir de 30 F 
toutes les nouvealites chaque semaine ” 


CA M 


Vous pouvez réaliser tous 


ces montages vous-même ! 
Alarme auto, Amplificateur 
Commande à distance par téléphone 
Alimentation stabilisée 
Convertisseur de tension 


ur Minitel 
tre 


ANPUEUS 29 RAS PEN EXCEPTIONES 


PC HD D  497FHT 
PCHODD GCROFIT 
DCHDID SCNFIH 
DM 3000 1830 FIT 


SOUS QUELLE 
ETOILE 
SUIS-JE NE ? 


La disquette double-face 


MIROIR 
ASTRAL 


I 
BON DE COM MAND Avec une date, une heure et un lieu de naissance, 


À renvoyer, avec votre règlement, sous enveloppe non I votre CPC établira un po Î j 
affranchie, aux Éditions WEKA Libre Réponse n° 2581-75, 75581 PARIS CEDEX 12 I approfondi  d'envir + ons porcnoe is 
es sur imprimante ! 


] Veuillez m'envoyez les 2 volumes de ‘Comment réaliser et réparer Ein loaiéfel at ; 
L ‘© les montages électroniques” 1 344 pages, format 21 x 29,7 cm, gICiel qui vous étonnera par sa profondeur ! 


au prix de 535 F franco TTC ainsi que mon cadeau gratuit : 6 tourne- (version familiale d'un logiciel utilisé par les professionnels) 


I vis de précision. J'accepte de recevoir automatiquement les complé-f A 
Stropsychanalisez votre famille,vos amis, 
comme les plus grands hommes célèbres. 


ments et mises à jour de 150 pages au prix de 215 F TTC port com- 
I pris. Je conserve la possibilité d'arrêter ce service à tout moment. [| 


NOM PRENOM ____— — | Commandez votre disquette pour CPC 6128 ou CPC 664 
L' & RUE ; = — - ne I (PORT GRATUIT) à : 

CODE POSTAL VILLE / Bernard VILLEMIN 
le de téléphone ____ _ Date 317, Av. de Verdun - 83110 SANARY - Tél. 94 74 32 00 


| indispensable _____ ee CPC 752217 J 
DR DS NS UN ON ON ON ON DS CU OS OS OU 


Yves GERAULT 


(SUITE) 


Les lignes PASCAL qui appartiennent au bloc instruction sont elles-mêmes appe- 
lées instructions. Une instruction PASCAL sera donc constituée par les caractè- 
res compris entre deux points-virgules. Comme nous l’avons vu précédemment, 
cette instruction peut être écrite sur une ou plusieurs lignes écran. Voyons main- 
tenant les instructions que le concepteur de PASCAL TURBO met à notre 


disposition. 
INSTRUCTION COMMENTAIRE 


Pascal est un langage compilé. Nous avons vu que le code exé- 
cutable (en binaire) est obtenu à partir du code source (en ASCII) 
via le passage par un traducteur (la compilation). Un point très 
important du fonctionnement de ce compilateur est qu'il ne s'oc- 
cupe pas de ce qu'il va reconnaître comme des commentaires. 
Nous pouvons donc en mettre autant que nous voulons dans 
notre texte source cela n'allongera en rien notre code objet. 
Alors ne nous en privons pas. 

Le compilateur reconnaît comme commentaire tout ce qui se 
trouve entre des accolades. Le commentaire commence avec 
une accolade ouvrante et se termine avec une accolade fer- 
mante. Bien sûr, ce sera une erreur fréquente d'oublier cette 


accolade fermante, ce qui fait que le compilateur prendra tout 
le reste de votre programme comme un commentaire. Mais cette 
erreur est facile à détecter avec un peu d'entraînement. 
Pour assurer la compatibilité de PASCAL TURBO sur des micro 
ne possédant pas les accolades, le concepteur autorise une autre 
manière de signaler les commentaires : il s'agit des caractères 
parenthèse  ouvrante suivie immédiatement par 
l'astérisque < <(* > > pour le début de commentaire et bien sûr 
de astérisque suivi immédiatement de parenthèse fermante pour 
la fin de commentaire. 


Où peut-on placer des commentaires ? A n'importe quel endroit, 
dans n'importe quel bloc ou sous-bloc en remplacement d'un 
séparateur. En d’autres termes, le seul endroit où il est interdit 
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: Jean-Luc AULNETTE 


Illustrations 


de mettre un commentaire, c'est à l'intérieur d'un identificateur 
car, par définition, un identificateur est une suite de caractères 
ne comportant pas de caractères séparateurs. Nous utiliserons 
largement ces possibilités en commentant très abondamment 
nos listings. 


LES OPERATEURS ARITHMETIQUES 


Il'est possible de faire subir à des variables, un certain nombre 
de traitements à l'aide de symboles appellés opérateurs arith- 
métiques, ils sont au nombre de 12. 


+ adaïition. 
- soustraction. 

* multiplication. 

| division. 

not négation bit à bit. 

or ou logique bit à bit. 

xor xor logique bit à bit. 

and and logique bit à bit. 

shr décalage de bits à droite. 
(shift right). 

shl décalage de bits à gauche 
(shift left). 

mod reste de la division. 

div division entière. 


Les opérateurs + - * / peuvent agir sur 
des objets de type entiers ou réels, mais, - 
attention, le résultat n'est pas toujours du même type que les 
opérandes (ex :3/5 = >0.6, les deux opérandes sont entiers, 
mais le résultat est réel). Le langage PASCAL vous signalera 
une erreur de fonctionnement si vous ne prévoyez pas ce genre 
de situation. 

Par contre, les opérateurs arithmétiques not, or, xor, and, shr, 
shl, mod, div, ne peuvent travailler que sur des entiers et le résul- 
tat est un entier. 

Une suite d'actions sur une suite d'objets est appelée une 
expression. Dans cette expression comme en BASIC, il y a un 
ordre de préséance entre ces opérateurs. 

not 

— * / div mod and shl shr 

— + -or xor 

En cas d'égalité de priorité, le calcul de l'expression se fera de 
gauche à droite et l'ordinateur prendra les opérateurs quand il 
les trouvera. 

Comme en basic, pour éviter les erreurs, mettez vos expres- 
sions entre parenthèses pour forcer la priorité des opérateurs. 


QUELQUES IDENTIFICATEURS PARTICULIERS 


Certains identificateurs ont une valeur par défaut : 


pi : 3.1415926536 E +00 

maxint : 32767 (c'est le plus grand entier possible) 
true : signifie vrai pour un booleen. 

false : signifie false pour un booleen. 


INSTRUCTION AFFECTATION 


Le résultat d’une expression est un objet qui a un certain type 
suivant la nature des opérateurs que nous avons fait agir. Il faut 
bien sûr stocker la valeur de cet objet à l'intérieur d'une case 
mémoire identifiée par un identificateur précisement. Ce qui 
revient à affecter à un identificateur le résultat de l'expression. 
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Prenons un exemple : si nous voulons calculer la somme de A 
et de B et mettre le résultat dans C nous pouvons schématiser 
l'opération par : 

AFFECTER à C le RESULTAT DE A+B 

Ce qui va s'écrire en BASIC : LET C = A +B ou très malheureu- 
sement par abus de langage C = À +B. Ce qui n’a aucun sens 
strictement parlant. Bien sûr, tous ceux qui font de l’informati- 
que le savent, mais il faut admettre que l'écriture de 1=1+ 1 a 
de quoi choquer bien des débutants. 

PASCAL fait partie des langages qui n’acceptent pas ce fâcheux 
abus de langage. C'est pourquoi il demande à ce qu’on note 
cette AFFECTATION par la syntaxe C :=A +B. Ce <<:=> > 
est le symbolisme réservé à l'AFFECTATION, on réservera le 
symbolisme < < = > > à l'égalité comme en arithmétique. 


INSTRUCTION WRITE ET WRITELN 


Tôt ou tard, il faudra bien qu'un résultat sorte de, 
notre ordinateur. Quelqu'en soit la destination, 
l'instruction aura la même syntaxe et elle ne sur- 
prendra pas les utilisateurs du BASIC LOCOMO- 
TIVE puisqu'elle est très voisine. Le listing 1 en 
donne quelques exemples. 

Suivant notre habitude décortiquons le premier 
exemple : 


write : mot reservé du langage PASCAL TURBO signalant que 
nous allons effectuer une sortie sur un périphérique. 

( : début des attributs de ma sortie ; 

output : précise que le canal que je veux utiliser est l'écran. 
, : Séparateur d’attribut. 

var.Î : identificateur repérant la variable dont je veux afficher 
le résultat. 

, : Séparateur d'identificateur. 

var_2 : idem var. 

) : fin des attributs. 

; : fin de l'instruction. 


Passons au deuxième exemple en ne parlant que des choses 
qui changent. 


Ist : précise que le canal que je veux utiliser est l'imprimante. 
a +b-c : expression arithmétique dont le résultat sera imprimé. 
a shr 2 : idem. 


Troisième exemple 


fich 1 : précise que le canal de sortie sera un canal privé de 
l'utilisateur (un fichier disque peut-être). 

123 : PASCAL TURBO autorise les sorties directes de valeur. 
‘mot’ : idem, mais avec une chaîne de caractères, remarquez 
qu'en PASCAL, les chaînes sont encadrées par des apostrophes 
simples et non par des quotes ‘’ ‘’ comme en BASIC. 


PASCAL présente une particularité du point de vue de l’affi- 
chage. Contrairement à BASIC, il n’a pas de tabulation par 
défaut. Il écrit ce qu’on lui demande d'écrire sur l'écran à la posi- 
tion où se trouvait le curseur à ce moment. De plus, il ne laisse 
aucun espace entre les valeurs. C'est au programmeur de pré- 
voir les espaces nécessaires. Cela correspondrait à l'option 


<<;>> du PRINT BASIC. 

Certaines facilités sont cependant offertes qui permettent de 
solutionner tous les problèmes de mise en page. 

— Si on remplace WRITE par WRITELN, l'ordinateur, après avoir 
écrit ce qu'on lui a demandé, positionnera le curseur sur la pre- 
mière colonne de la ligne suivante : il fera un retour à la ligne 
comme une machine à écrire. 

— Prenons maintenant l'exemple numéro 4. 

var.1:5:2 : signifie que le contenu de la variable var.1 sera affi- 
ché sur 5 colonnes, que le résultat sera cadré à droite avec 2 
chiffres après le point décimal (il est évident que var_1 est du 
type real). 
var_2:4 : signifie que var_2 est du type entier et qu'il sera affi- 
ché sur 4 colonnes cadré à droite. 

mot:12 : en supposant que mot soit du type string, le contenu 
‘de mot serait affiché sur l'écran sur 12 colonnes. 


INSTRUCTIONS READ ET READLN 


Nous n'étudierons que le cas de READLN. Nous reviendrons plus 
tard sur l'utilisation de READ qui suppose une digression préa- 
lable sur la gestion du clavier sous PASCAL TURBO ainsi que 
sur la notion généralisée des fichiers (pas de quoi s'affoler, mais 
chaque chose en son temps). 

L'ordre READLN ressemble beaucoup à l'ordre INPUT du BASIC, 
mais en diffère aussi notablement. Des exemples sont donnés 
par le listing 2. 

La différence essentielle est qu’en PASCAL un ordre READ, cela 
ne sert uniquement qu'à lire et qu'un ordre WRITE cela ne sert 
uniquement qu'à écrire. C'est assez logique, mais ce n’est pas 
le cas en BASIC. La signification des divers champs de cette 
instruction est assez évidente, rappelons-les rapidement. 


readin : mot réservé du PASCAL TURBO signalant au compila- 
teur qu'une entrée va être faite. 

(: début des attributs de l'instruction. 

input : désigne que cette entrée va être faite par le canal entrée 
standard (le clavier). 

, : Séparateur d'attribut. 

var.1 : identificateur de la variable à laquelle va être affectée 
la valeur de ce qu'on rentrera. 

var.2 : idem var.1. 

) : fin des attributs. 

; : fin de l'instruction. 


Autre différence notable, les diverses valeurs devront être sépa- 
rées par des espaces et non des virgules comme en BASIC. 
Cette différence est plus gênante car, en cas d'erreur en entrée, 
iln'y a qu'une sanction : la pire !! < < run time error > > et arrêt 
de l'exécution du programme. Il y a, bien sûr, moyen d'éviter 
ce plantage du programme, mais ce n'est pas encore à notre 
niveau. Alors, faites très attention à la syntaxe de vos entrées. 
Bien sûr, puisque cette instruction se finit par un <<in>>, 
le curseur se déplace au début de la ligne suivante après avoir 
terminé sa lecture. 


FONCTIONS ET PROCEDURES 


En dehors des opérateurs qui nous permettent déjà de calculer 
diverses expressions et d'en affecter le résultat dans une variable 
repérée par son identificateur, il est possible d'effectuer d’au- 
tres types d'actions qui se nomment des fonctions et des 
procédures. 

LES FONCTIONS sont des actions déjà connues de ceux qui 
ont travaillé en BASIC. Certaines portent même le même iden- 
tificateur par exemple < <cos> > pour cosinus, d'autres en 
différent par exemple < <length > > au lieu de < <len > > pour 
longueur d'un mot. Toutes ces actions ont un point commun : 
elles ne délivrent qu'une seule valeur qui doit être affectée à 
une variable (ex : cosinus.20 degré: = cos (20);). 


LES PROCEDURES ne sont pas totalement inconnues à l'utili- 
sateur du BASIC. Prenons comme exemple < <locate 
20,10> > . En PASCAL TURBO, elle sont généralisées et plus 
performantes. Citons pour exemple < <str(valeur,mot)> > qui 
convertit une <<valeur>> numérique entière en un 
< <mot> >,une autre < <gotoxy (25,30) > > aura le même 
sens que notre < <locate> > en BASIC. 

Ces fonctions et procédures sont nombreuses et nous nous 
attarderons dans notre prochain article à vous les décrire. Mais 
où le PASCAL devient génial, c'est que s'il n’y en a aucune qui 
vous plaise pour résoudre votre problème, PASCAL vous auto- 
rise à la créer à votre guise et ensuite à vous en servir comme 
si elle avait toujours existé (pratique non!!!}. Nous y reviendrons 
très prochainement. 

Pour clore cet article sur les entrées sorties simples, le listing 
3 vous montre ce qu’on peut faire avec les quelques instruc- 
tions que vous avez maintenant à votre disposition. 


CARRR RER RER ERREUR ERREUR MR RU RURED REA RÉ EU OR NRA ER RE RXXE EX 
{ ceci est un conmautairs pui 


sque Chnipris entre 


des a: 


CRUE GRO UE URSS OR RAR RARE RENE 


{ exemple nusrero 1) 


write (output ,var 1,va3r 2); 

{ exenple numero 2 

write (Ist,atb-c,a shr 2; 

{ e“ersle numero 3; 

write (fich_1,123,'act"); 

U gxsngle nurero 4); 

writein (output,var !{:5:2,var :4,mat:i 

CRRSERRERE RER RSR ER RO RD RER M RD ER RAR RM RU EN M RON tt 
(# ceci est aussi un autre commentaire pulieque Compri 
(+ les symboles ( suivi immediatement par 4 

(+ get # suivi immediatenent par ) 


CRRRDRRRR ERREUR ERREUR USER RER RUE R RU RUES SR UE RER EURE EU EH ER 6%) 


SON VIDÉO 
2, 2000 


: MICRO 
AQUITAINE 


ATARI 


amsTran  @RIC 


OLIVETTI 


G commodore 


Compatibles IBM 


AH E +) H 


coliates ) 


téstnsrtes 


31, cours de l’Yser 

33800 BORDEAUX 
Tél.: 56.92.91.78 
Télex 572-421 


*) \ 


{ exemple numero 1 ) 
readln (input,var _1,var 2); 


listing 3 : Programme Pascal illustrant les notions développées dans cet article. 


ZESSSTIISSESSRDDSESEESNSOSERANASEISSDES SEE DONESSENESLSSSESSESSSSESSSESSSASSESESSE 


pragram essai_des_operateurs_arithmetiques (input ,output); 


(2222222222 RmCSERSSSEDNARSSSSRESSE SSSR ESS=SSS=LEZSSLSEES) 


€ debut de mon bloc declaration} 
{ debut de mon sous bloc declaration des constantes } 
const 

constante entiere = 100; 
constante reelle_1 = 1.25E+05; 
constante reelle 2 = 12.354; 
constante _string æ ‘mot constant; 

{ fin de mon sous bloc declaration des constantes } 


{ debut de mon sous bloc declaration des variables } 
var 

variable entiere |, 
variable entiere _2 integer ; 
variable reelle_1, 
variable reelle_2 ë real ; 
variable string D string [40]; 

CU fin de mon sous bloc declaration des variables } 

{ fin de mon bloc declaration }) 


{ debut de mon bloc instruction ;: 
begin 
write (output, ,'entrer valeur des variables entieres 1 et 
readin (input,variable entiere _1,variable entiere _2); 
write (output, ‘entrer valeur de variable string :°); 
readin (input,variable_ string); 
variable reelle_1:=2 # constante reelle 2; 
writeln (lstijwriteln (list, .', debut de 1 execution');writeln(ist); 
sriteln (lst,” .',variable reelle_1,constante reelle 1); 
writeln (ist,” .',variable reelle_1:9:5,constante reelle_1:10:2); 
writeln (lst,' .',variable entiere _1:5,variable entiere _2:5); 
writeln (lst,° .'", maxint = ‘,maxint:10,'pi = ‘,pi:20:15); 
variable entiere _1:=9;variable entiere 2:=2; 
writeln (lst,° «'," 9 mod 2 = ‘,variable _entiere_1l mod variable entiere _2:3); 
writeln (ist, .'," 9 div 2 # ‘,variable entiere { div variable entiere _2:3); 
writeln (lst,' , 0000 0001 or 0000 001G or 0006 OUI = 0000 0011"); 
writeln (lst,° tee Î or 2 or 3 = ÿ "+3 
writeln (1st,' su "Al 6e 2 67 3j; 
writeln (l1s1,° .',constante string:40,'*x#x fin de la zone‘); 
variable _string:*constante string+' plus long'; 
writeln (lst,' .',variable string); 
end, 
{ fin de mon bloc in£truction et fin de mon programme) 


—————————————…..…… —… —.… ….… —… —…..—… …. … "… .…" …"—"—"—"— —_—_——_———…—…—…——…—.—.——_— 


.debut de 1 execution 


«+ _2,47080000000000€+001  1.25000000000000E +00 
. 24,/0800 125000.00 
. 9 2 
.maxint # 32767pr = 3.141592655589790 
. 9 mod 2 = 1 
. div 2= 4 
«0000 O0ù01 or 9900 0010 or UDU0 0011 = 0000 O0t1 
or ri or 3 = 3 
3 
. mot constant#sx fin de la zone 
.mot constant plus long 


NOMME à Su à 4 its ea 4% le Sauf imprévu, les commandes 
sont exécutées dans les 48H 


Prénoms ,.:5-= à 2 ME, 4.4 suivant leur réception. 
Adresse: . . . . . . . . 
Sémaphore Logiciels 
RE Case Postale 32 
Codé: POStALE à se Sa sus à le CH-1283 La Plaine (Suisse) 


VILEÉE:) ns 6 Lee un d'ou LL 


J'ai le plaisir de vous passer commande pour les articles suivants, 


Gamme CPC Prix HT Totaux 
Tasword 464 sur cassette ........................... 195,00 FF 
Tasword "D" ou 6128 "Mailmerge" sur disquette ...... 280,00 FF 
Masterfile III ( 128K ) sur disquette .............. 300,00 FF 
Mastercalc 128 sur disquette ....................... 280,00 FF 
Agenda CPC sur disquette :: 21422 teurs state nee 195,00 FF 
Tasprint. CPC SUÉ Cassette os ss et nee on de np 170,00 FF 
Tasprint, CPC: sur disquétte. 246 ares D subie d'ores cts 195,00 FF 
TascCopy. CPC Sur: Cassette. 2 mit mie de Re A eine 170,00 FF 
Tascopy: CPC: Sur :ÉLSQUÉELS 2578 Semen dde due mon are 195,00 FF 
Crayon optique DART logiciel disquette ............. 280,00 FF 
Raccord pour crayon et 6128 Amstrad ................ 75,00 FF 
Cable conversion BUS 6128 Schneider/Amstrad ........ 150,00 FF 
Digitaliseur (scanner) DART pour DMP 2000 & 3000 ... 600,00 FF 
Scanner + Crayon: ODEÏQUE. 22 5 be des gun et ue it ee 790,00 FF 
Multiface II (464/664/6128) ........................ 450,00 FF 
Extension mémoire DR'EÉronics 64Ko (1464/6641) :.:.42%: 430,00 FF 


Gamme PCW 


TaswWord 8000 és ssh tenne dent ds bee nt Mn den de 380,00 FF 
Disquette d'essai Tasword 8000 ..................... 66,00 FF 
TaSbELnE 8000: 4:58 re rs ne Lies hé etude le teens A 195,00 FF 
Tasword.:+ Tasprint 8000 24m sis. dires mines dent 520,00 FF 
DiSemate 8000 sisi nee tentera le-eren re ere ee RSS 199,00 FF 
Masterfile 8000 (livraison mars 1987)............... 490,00 FF 
Jeu Extension 256Ko pour PCW ....................... 250,00 FF 
Fhterrace. ZJome Lécéeus OU D masé aid inen le sadus 450,00 FF 
Lecteur 3,5 ou 5,25 de 720 Ko pour PCW ............ 1500,00 FF 


Gamme PC 1512 


Tasword PC (livraison mars 19587).................... 380,00 FF 
Disquette d'essai Tasword PC (disponible)l........... 66,00 FF 
EXLenSIion. à GAOES PC LS T2 mana mass ea se bess de ite 250,00 FF 
Frais de port en recommandé, par commande .......... 25,00 FF 25,00 
Supplément de contre-remboursement ................. 25,00 FF 
TOTAL:FF 


La TVA (18,6%) se paye au facteur à la réception des marchandises - Revendeurs, contactez-nous. 
( _) Veuillez débiter ma carte de crédit du montant de ma commande 
VISA TEUROCARDN: sale us Tuuz Les ED 08 es 
{ ) Je vous envoie le montant de cette commande par: 
Eurochèque - Transfert bancaire - Mandat postal international 
(CCP 12-16681.8 à Genève - Cpte D6-105,283.0 S.B.S Genève.) 
Les chèques français autres que les Eurochèques ne sont pas négociables à l'étranger, merci de ne pas en envoyer 


Date . . mu 5 & SLGRhaEUres Sos La ne ah jen le 0 2 CPC n.23 


Commandes par téléphone au 19.41.22.54.11.95 lundi à vendredi de 9 à 18H. 


MASTERFILE 8000 


LE GESTIONNAIRE DE FICHIERS LE PLUS ATTENDU SUR PCW ! 


ATTENTION, MASTERFILE 8000 n'est pas un programme BASIC compilé 
rapidement adapté du CPC au PCW ! C'est un produit entièrement 
nouveau, qui bien qu'il ait gardé le meilleur des caractéristi- 
ques de la version CPC, a été créé spécialement pour le PCY. 
Les autres produits disponibles offrent un choix entre des 
fichiers en RAM rapides mais de capacité limitée, et des 
fichiers en accès direct sur disquettes, de grande capacité 
mais encombrants car de longueur fixe. MASTERFILE 8000 et le 
disque RAM du PCW travaillent ensemble pour vous proposer une 
grande capacité et un accès rapide à des données de longueur 
Variable. La longueur de vos fichiers n'est limitée que par la 
taille de votre disque M. L'abscence d'accès disquettes en 
cours de travail représente un gain de temps et une économie 
d'usure mécanique appréciables. 

MASTERFILE traditionnellement champion toutes catégories pour 
là création de masques de saisie et de présentation des données 
s'est surpassé. Tous les questionnaires et menus ont disparus, 
vous créez ‘en temps réel' à l'écran vos masques, comme dans un 
programme de dessin. La mise à jour d'enregistrements est 
directe grâce à l'éditeur ‘pleine page' du programme qui permet 
les modifications et corrections de rubriques directement sur 
le masque. Des options uniques permettent de gérer les dates en 
français: 7 janvier 1987 au lieu de 870107 par ex. , de placer 
M. Mme, Mile, etc. devant les noms tout en “gardant là 
possibilité de trier ceux-ci, d'effectuer des calculs entre 
champs etc... Tout l'affichage écran est GRAPHIQUE et les 
effets - lignes, boites - sont dessinés avec précision, les 
interlignes se choisissent en pixels. Tout ceci plus rapidement 
que CP/M ne le permet normalement. Les options de l'imprimante 
PCW sont toutes accessibles par menu. 

Les fichiers indexés sont automatiquement classés en 
et ne devront jamais être triés. Vous pourrez aussi créer des 
fichiers non indexés, dans lesquels vous pourrez insérer des 
données où vous le voudrez. Il est nee de créer des fich- 
iers ‘relationnels' ayant jusqu'à 8 niveaux. Vous pourrez imp- 
porter/fusionner tout fichier fsctr (par ex. de MASTERFILE III} 
ou exporter des données par ex. vers un traitement de textes 
comme TASWORD 8000. La fusion de fichiers est aussi possible; 
pour les fichiers indexés, il s'agit d'un véritable 'merge' et 
non pas d'un ajout. Cette fonction permet la copie de fichiers 
en modifiant l'ordre des clés. De nouvelles rubriques peuvent 
être créées en tout temps. La recherche des fichiers combine 
flexibilité et rapidité et comprend toutes les options de tri 
habituelles: alphabétique, numérique, croissant/décroissant, 
logiques, par dates etc... Il vous est même possible d'assigner 
dans des cases (7 au maximunl pendant le tri, des sous-ensem- 
bles de données pour référence ou traitement ultérieur. Le plus 
souvent MASTERFILE 8000 vous attendra, pas le contraire. 
MASTERFILE 8000 est entièrement dirigé par menus, 100% en code 
machine, il est livré avec une bibliothèque d'exemples directe- 
ment utilisables et un manuel didactique détaillé. Aucun autre 
SGBD (Système de Gestion de Bases de Données - u2 grand mot 
pour décrire un ‘carton à chaussures plein de fiches'...) sur 
PCW n'offre une telle puissance, flexibilité et convivialité. 


séquence 


GRR ER EEE APR  ERrPOE HN ME A ONAOERN DETENTE ORONNS MEL SAONE LIT SLR VIE RDC D 7 LA TAN A 


TASWORD 8000 RETROUVEZ LA SIMPLICITE ET LA PUISSANCE DE L'ECRITURE ! 


Accès direct à toutes les lignes, pages de votre texte en moins de 7 secondes ! Impression sélective 
Aucun accès au disquettes en cours de travail. 
puissante 
nécessitant aucun autre programme. Accès à toutes les imprimantes via l'interface Centronics/RS232 du 
imprimante 
Tasword/Amsword CPC 
gestionnaires 
NOUVEAU: le programme GESTION-PLUS GP II de la maison ARKENCIEL, 
TASWORD 8000 permettant l'utilisation du fichier clients 
création de documents tels que relances, lettres personnalisées, devis complets etc. 


de parties de texte sans attente. 
sur PCW 8256 et 320 Ko sur PCW 8512. Fonction ‘publipostage’ 
PCW (ces pages ont été entierement créées sur le PCW et une 
fichiers Locoscript et utilisation des fichiers 
Compatibilité avec Masterfile 8000, dBase et tous 


les autre 


Toutes les marques mentionnées sont déposées et appartiennent 
Les progiciels Sémaphore ne sont PAS protégés pour permettre 


la 


TASWORD PC 


Le Traitement de textes POUR LES PC IBM, 
L'AMSTRAD PC 1512 ET AUTRES COMPATIBLES" 


FACILE ! 
La force des Traitements de textes TASWORD a toujours été leur 
simplicité, aucun programme du genre n'offre autant de puis- 
ance avec une telle facilité d'accès. Le programme didactique 
intéractif 'Tuteur', livré gratuitement avec chaque TASWORD PC 
permet une prise en main rapide, peu après avoir reçu votre 
disquette vous produirez sans peine Vos premiers documents. 
Avec TASWORD PC vous pouvez écrire sans avoir à Lire de volu- 
mineux manuels. TASWORD PC ne demande l'apprentissage d'aucun 
langage ou Procédure compliqués. Vous tapez comme sur une 
machine à écrire mais avec toutes les options magiques du TDT. 

PUISSANT 

TASWORD est aussi livré avec le puissant programme de "publi- 
postage *MAIL-MERGE", un outil qui se pliera a vos plus folles 
exigeances en la matière . Une série d' exemples de fusion est 
livrée sur la disquette avec un guide de prise en main pas-à- 
pas. Une autre qualité de TASWORD PC est la facilité avec 
laquelle il se modèle pour épouser aux mieux VOS désirs et Les 
caractéristiques de VOTRE matériel. À l'impression par ex., il 
est possible d'adapter TASWORD pour utiliser pleinement toutes 
les fonctions de votre imprimante: choisir le nombre de copies 
l'interligne, les en-têtes et pieds-de-page, la numérotation, 
la fusion - en cours de travall - de textes contenus sur 
disquette. Toutes les écritures et effets divers offerts par 
votre imprimante sont accessible avec simplicité. 

Plus de 20 options de déplacement dans le texte, la longueur 
de vos documents n'est limitée que par la mémoire disponible, 
pas d'accès disquettes en cour de travail d'où rapidité accrue 
k moins d'usure du matériel, justification, frappe "au 
kilomètre", déplacement de blocs, reformatage, fenêtre de 
travail de 256 colonnes, tabulations et règles définissables 
avec bibliotheque de tabulations, menus d'aide constamment 
disponibles - même simultanément avec la saisie, neuf options 


d'effacement, deux options et deux modes d'insertion, 
recherche et recherche/remplacement de texte globale ou 
sélective, etc., etc., ... TASWORD PC produit des fichiers 


ASCII et est donc compatible avec la plupart des gestionnaires 
de fiches et des autres traitements de textes pour PC. 


La récupération des fichiers créés sur Tasword Spectrum, 
Tasword/Answord CPC et Tasword 8000 est possible. 


Un correcteur d'orthographe en français est en préparation. 


UN ESSAI POUR 70 FF. C'est tout ce 
possibilité de vous convaincre de la puissance et de la 
simplicité de TASWORD PC. Le prix de la disquette d'essai 
TASWORD PC vous sera crédité en cas d'achat du programne. 


que vous coûte la 


MASTERFILE 8000 490 FF HT 
TASWORD 8000 380 FF HT 
TASWORD PC 380 FF HT 


Fichiers de 90 Ko 


et flexible INCORPOREE ne 
"LASER" |}. 


et 


Conversion des | 
Wordstar possible. 

de fichiers sérieux. 

est maintenant compatible avec _. 

pour le publipostage et la 

à leurs 
création 


propriétaires 
de copies 


respectifs. 
de secours. 


GENEPHOT 
(C> C.PAUEN 1986 


PELIETPPTEIETITEITIITT OR 


PHOTO-SPRITE est une ‘‘boîte à outils” 
permettant la gestion de mini-images 
graphiques de 32*32 points (genre 
photo d'identité). 

Elle vous permettra de créer et de repro- 
duire des photos, blasons ou représen- 
tations d'objets pour agrémenter un jeu 
d'aventure. 

L'ensemble comprend : 

— une routine d'affichage en langage 
machine baptisée PLOT1, ou PLOT2 sui- 
vant son adresse d'implantation, qui sera 
générée par le programme BASIC CHAR- 
GEUR listing n° 1); 

— deux utilitaires CONVERT et GENE- 
PHOT pour générer les fichiers PHO- 
TOx.BIN contenant les images à 
visualiser. 

Le programme fonctionne sur CPC 464, 
664 ou 6128. 


LA ROUTINE PLOT1 


Ecrite en langage ASSEMBLEUR pour 
avoir un affichage très rapide, elle est 
appelée à partir du BASIC par un CALL 
&A100 après avoir fixé l'origine de la 
fenêtre graphique. La routine peut repro- 
duire des images en mode 1 avec qua- 
tre couleurs et en mode 2 avec deux 
couleurs. 

Elle occupe les adresses &A100 à 
&A170, l'image occupe 1024 octets de 
&A200 à &ASFF, l'espace restant entre 
les deux est utilisé par la routine pour ses 
variables. 

Si vous désirez faire défiler plusieurs pho- 
tos au même emplacement, vous pou- 
vez appeler la routine par CALL&A138, 


LELLIELL] 


#4 
+ COPY + 


? 


l'initialisation de la fenêtre n'étant pas à 
refaire. 

Dans le cas où vous auriez des exten- 
sions connectées autres que le lecteur de 
disquette (synthétiseur, interface 
RS232C...) la routine sera en conflit avec 
l'espace mémoire réservé pour ces der- 
nières. Les connaisseurs pourront faci- 
lement reloger la routine en modifiant les 
adresses de saut ; pour les autres, le 
chargeur BASIC de la routine vous pro- 
posera deux adresses d'implantation : 
&A100 ou &8100. Si vous avez des 
extensions choisissez &8100 mais pen- 
sez à modifier en conséquence les pro- 
grammes BASIC. 


LE PROGRAMME CONVERT : {listing 2) 


Vous permet de créer un fichier PHO- 
TOXx.BIN à partir de données en DATA. 
Conservez les DATA de vos créations, 
si vous effaciez votre fichier .BIN c'est 
le moyen le plus rapide de le reconstituer. 
Seules les photos en 2 couleurs peuvent 
être traduites en DATA (ces 2 couleurs 
correspondant aux ink O et 1 de préfé- 
rence), lors de la traduction, toute cou- 
leur différente de l'ink O est considérée 
égale à 1. 


LE PROGRAMME GENEPHOT : 
(listing 3) 


L'outil indispensable pour donner libre 
cours à votre talent. 

— la saisie s'effectue directement à 
l'écran, le curseur est déplacé par les flè- 
ches ou avec le joystick. La case poin- 


tée prend la couleur du crayon sélec- 
tionné en pressant la touche COPY ou le 
bouton FEU du joystick. 
Les commandes disponibles sont affi- 
chées dans une fenêtre : 

‘’Load'’ charge une photo après vous 
en avoir demandé le numéro. La photo 
sera affichée à l'échelle 1 et reproduite 
dans la grille de saisie pour être éventuel- 
lement modifiée ; 

— ‘‘Save’’ sauvegarde une photo. Lors 
de l'appel de cette fonction, une mise à 
jour de l’image à l'échelle 1 est effectuée 
automatiquement. Un sous-menu vous 
permet la sauvegarde, l'édition des 
DATA (pour photos en 2 couleurs uni- 
quement) ou le retour au menu principal ; 

‘’Couleurs'” appelle un sous-menu 
qui vous permet d'adapter l'écran à votre 
goût et de choisir les couleurs des 
crayons. Les numéros de couleurs sont 
affichés en regard des commandes de 
sélection pour le bord et les quatre 
encres ; 

— ‘‘Aller case’’ déplace le curseur à 
l'emplacement demandé ; 

‘’Mise à jour'’ code en mémoire la 
photo de la grille et affiche la représen- 
tation à l'échelle 1 correspondante ; 
— 0,1,2,3 sélectionnent le crayon actif 
pour la saisie, ce dernier est repéré en 
permanence par une flèche ; 

— pour les 2 dernières commandes, 
‘‘’Effacer’’ et ‘’Quitter’”, une confirmation 
est demandée. 

NB : un BREAK peut se produire si vous 
demandez le chargement d'une photo ne 
figurant pas sur la disquette, ce type 
d'erreur n'étant pas interceptable en 
BASIC, il vous faudra relancer le pro- 
gramme par RUN 520. 


ADAPTATIONS DE LA ROUTINE PLOT 


La routine peut reproduire également les 
photos en mode 2 (seulement celles 
générées en 2 couleurs). 

L'affichage en 2 couleurs peut être accé- 
léré en pokant des O en &A14B, &A14C, 
&A14D. 

Vous pouvez changer les dimensions de 
la fenêtre graphique, mais il vous faudra 
également modifier GENEPHOT ainsi que 
CONVERT et tenir compte de la taille 
mémoire des fichiers PHOTOXx.BIN. 

En conclusion, cet ensemble devrait vous 
permettre de donner à vos programmes 
un ‘look pro'’ et vous inciter à vous ini- 
tier à l'Assembleur, dans ce dernier cas 
deux ouvrages vous seront nécessaires : 
— le FIRMWARE de votre CPC qui vous 
donnera toutes les informations sur les 
routines utilisables de la ROM ; 

— PROGRAMMATION DU Z80 de 
RODNAY ZAKS aux Editions SYBEX qui 
est la véritable bible pour ce micropro- 
cesseur. 
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LISTING 1 


SE MODE 1: : 
NE 95 I1IE 


tt 


5 FETNT CHARGEUR 
tine FLOT "x 

SPRINT OS TRING 
4 Ma CHR S (24) 
LOCATE 1, 6: FRINT'A 
adresse voulez-vous la 


quelle 
routine 


Li LOCATE 14, 6: 
MAts LOCATE 14,6 


PRINT" 1: 
Pi PRINT 2: 


3 LOCATE 18,11: INFUT'"'Votre c 

: s'schoix 
LEGO IF choix 21 
THEN 126 
LAS FAFER 


AND choix 
Si FEN Se LOCATE 
FRINT® um instant svp je 
ille pour vous "3 

156 ON choix GOSUE 516,526 

164 FOR awadr TO adr+%76@:READ 
vs FOKE en Va NET a 
179 GOSUR SG: LOCATE 1,12: FRIN 
T'Hettre votre support magneti 
que en place pour sauvegarde p 
UiS presser une touche" 


1,4: 


trava 
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186 
196 


CALL. 
SAVE 
294 END 
266 FAFER G:FEN Le LOCATE 1,24: 
FRINT SFACES (46) ; 2 RETURN 

218 RESTORE 1666: nom#e"!'plotil" 
196: RETURN 

STORE 2666: nomé#s"!plotez" 
:adr=889100: RETURN 

1966 DATA 21,66, a 


.cc.bb,ed,53,82,a 


LBEGé: CALL SRREE 
nomé,b,adr,®&/71,adr 


as 


2e, 06,69 
1316 


en re 


DATA 2®,84,al, 
,88, A 


3 DATA al,cd,c+t,bb,ï%a,8a,ail 
cd,e4, bb, =a,8b,al,cd,de,bb,cd 
d5,bb,dd 
ILETX Lars 2a,54,al, 
dd,7e, 66,fe,66,ca,57 
'bb:58 16 
Lee DATA 66,69,26, 
.ci,n4,64,Te, 46, 
25,18,df 
à DATA 
du, 
266% DATA 
cc, bb,ed, 
: 2e, 66, [ele 
26 DAT 
*B1,2a, 88, 
,21,2a, 86 
2024 DATA 
,cd,e4,bb, 
,db,bb,dd 
2070 DATA 
dd,7e,46, 
,bb,58,16 
2046 DATA 66,89,26,66,cd,ea,bb 
.ci,64,64,%e, 44,Db6,268,4@5,cS, dd 
23,18, d+ 
2959 DATA 66, oi: 
CS, dd,25,18,d3,c9@ 


61,:e,96,cs 
al, cd,de 


6, cd,esa, bb 
b5,280,05,c5,dd 


06,06, 06d,6d, fa, 76 
,c9 


sal 


89,81,cd 
,88,81,61 


LE, 94, 
81,cd 


81,eb,69,22,86 
,d?,bb,ed,5b,8® 


81,cd,c+ 
La, 68b, 


4bh,ïa,8a,s 
B1,cd,de,bb,cd 


2a,84,81,61,%e,64,cs 
fe,n6,ca,s7,81,cd,de 


fa, 76,81 


LISTING 2 
RSR 


SD DEN HE DE DE DE DE HÉ DE DE DE DE ÉD DE DE DEN DEEE 
* Conversion DATA-FHOTO:%X 
#X (C)1986 C.FAVEN ## 
HD É HE DÉ DE DE DEEE DE DEEE DEEE DENON DE DE 
19 MEMORY RAIFF:adretAreQ 

29 KESTOKRE 


pute 


+QC< 


HE 


#AF< 


MG 


>QC< 


*CD< 


2PFE 


*BG< 


#DH= 


+MB< 


#JC< 
#KD< 
>QE< 
WEB 
>CC< 


264 FÜR br i TO 


és FEAT 


TO 15:PC 
prisiiiet 


EE adr+p, Vé 
EXT 


L(MIDS (VE, 
66 adr=adn+léiNEXT b 


F4 INPUT Numero de 
Mnginée tt lphototdné 
B4 GAVE mé, D, Age, 
Ge ENT 

LA ex FLE 
CETTE LIGNE 


la photo : 


La 


EZ LES 
ÉEET | 


DATA AFRES 


LISTING 3 


CHERE EM EE EDEN DE NEO 
* GÉENERATEUR DE FHOTOX + 
## (CCI CL, FAVEN #4 
AREA MEOHE CHE HE DE HE 

MODE Le EORDER LE: NE 6, 1 

L,ISSINE 2,16: INK 2,3:boz1l3 
: rides cramis £ 


ONE 18 
8 MEMORY BAG: ade=&ATAG: LOAD 
“iploti", LALGE 
76 POÉE BAIBA, @:POÉE RAÎBE, 1 
es CLS: WINDOW#E , 2 49,11,24:FE 
N OL: PAPER GG: WINDOW#HI,2, 20,2, 
PEN#1, 1: PAPER#L, Ge WINDOW#E, DE, 
22,5, 0: PAPERKE, de: PEN#E, Li: CLS#E 


9@ MÜVE 28: DRAWF 
:DRAUR &, 60: DRAWF 628, 

G,-398:DRAUR -2316, 0: DRAWR 9,7 

GB: DRAUR 10,6: MOVE 628, 256: DFA 

WF 214,6: MOVE 520,250: DRAUR 6 
, 88 

198 LOCATE#1, L6, 2: FRINT#1, "GEN 

EFHOT "3 :LOCATE#L, 12,2: FRINT#1, 
“{C) C.FAVEN 1986" 

118 MOVE 424,226: TAGKE: FRINTHE 
, CHARS (246) 5 2 TAGOFFHD: PRINTHS: EF 

RINTHD: PRINTHE, % MCHRE (242)+" 
COPY “+CHRE (242) 2 FRINT#S: MOVE 
424,274: TAGHD: PRINTÉE, CHRS (24 
1): TAGOFFHE 

126 GOSUE 1976 

126 INE 1,6:GOSUE 326: xc=Z:yc= 

#12: GO0SUE 274 

139 

148 
141 
156 IF 


526,6, 1 
à: DRAWF 
D, TE 


‘gestion des commandes 


NOT INEÉEY (Gi OK NOT INE 


EH 
ELA EN 


UE 


#VD< 
FES 


2NP< 
>YF< 
>FG< 
+FG< 


EY(7Ei 
& haut 
Léé IF 
EY (750 


THEN GOSLIE 856 s vers ! 


NOT 
THEN 


INEEY CE) OR NOT IH 
GOSUR 964 se 'vers | 


NOT TINEESY C1 DK 
{ THEN  GÜSUE 
a droite 
186 IF NOT INEEY (ES OF 
EVYE74) THEN GOSUE 976 
a gauche 

196 IF NOT INÉEY (90 
EvC7éi THEN GOSUE 
Li FEU 

2% IF NOT 
E 1L@ié 


NOT OINE 
GE 2 vers | 


HOTTE 
‘vers 


OR NOT INF 
AE CLOPY © 


INÉEY Cé6 
‘aller case 
“1 IF NOT INEEY CE) OK NOT IN 
EEYCLES) THEN crarte GOSUE 56 
‘couleur 

IF NOT INEÉEY Cé&éi OÙ NOT IH 
REY (13 THEN crade GOSUE ES 


couleur À 

4 IF NOT INEÉEY(&5) OK NOT IN 
EYCLA4r THEN crarés GOSUE 256% à 
‘couleur 

4e TF NOT INEEY CS7i OK 
ÉEY C5) THEN crarë: GOGSUE 
couleur 

so IF NOT 
E lé 


THEN GOSU 


RUE | 


de 


NOT IN 


HS 


INÉEY CEé) THEN GOSL 
‘chargement d'une photo 


“où IF 
E 616% : 


NOT INÉEY Cé@i THEN GOSU 
‘sauvegarde d'une photo 


2764 IF NOT INÉEY(&2) THEN GOSLU 
HE 714 : ‘changement couleurs 
2864 IF NOT INEÉEY CES) THEN GOSLI 
E 46% 2: mise a jour echelle 1 
2964 IF NOT INEEY(C581 THEN GOSL) 
E 11964 : effacer photo 

INÉEV &7) THEN GOSLU 
‘quitter 

GOT 14e 


294 IF NOT 
BE 1266 : 
516 


affiche commandes 
3 CLS: FARINT" COMMANDES Ua 
PRINT" eee le BRL NT 2 FR 
INT — Elroad"," - Grave", 

éCrouleure tt tâsller 
so EéMrise a jour" ee Gr go 
mme 
F46 FRINT®' + 21% crayon No 1": 
PEN SsFRINTM + Er crayon No 
EMUssPFEN GsPFRINT® - £ir crayon 
No ŒEUs:PEN LiFRINT" — <Estface 
éQruitter"s 
3% FOR bz@ TO ZS:LOCATE 2, 94+b: 


St. HÙ 2 
Fo 


2 FH 


HUIT 


sQL<E 


BE 


» JG< 


#LHE 


sHHE 


#DJ< 


65 


FRINT "-U3:NEXT b:LOCATE 2,9+c 
ras FRINT CHR& CEA) ; 
E64 RETURN 


‘affiche curseur graphique 


284 coearTEST(xc,ycisccurceca X0 
296 FOR bexc TO xc+é STEF &: 
VE b,vyc: DRAWR 6,6,ccu:NEXT b 
E TURN 

F Le G 
466 
461 
41% FOR bexe TD «xc+é STEF Z: M0 
VE b,yc:DRAWR 6,6,craiNEXT bic 
ol=1: RETURN 

419 

42e ‘mi 
421 

HG coke: ycosycs adregASéo: Tr 
cols THEN GOSUR 276 
446 FOR vyc=312 TO 2 STEF -16 
454 FOR xc=2 TO Y12 STEF 16 
486 FÜOKE ad TES Ve) sedies 
dr+1 

476 NEXT KXC:NEXT ye 

AB nc=xco:ve=ycoslF col=sé THE 
N GOSUER 276 

496 ORIGIN CALL &AlOG: 
ORIGIN &,6,6,7226,220,06 

390 RETURN 

JA 

18 ‘chargement d'° 
Se 2 

326 GOSUR 576: CALL 
RINT CHKS& (24) " CHARGEMENT 
Ms CHARS (24) 2 PRINT: PRINT: INFEUT 
Fhoto No :",n$ 

336 n$=!"lphoto"+tng:adretAzo6:Ll 
DAD n$,adr:GOSUE 1676: GOSUR 49 
à 

4 FOR vcer=3iz TO Z STEF -16 
3936 FOR xec=2 T0 312 STEF 16 
S64 cra=FEEE Cadr)iiF cra= THE 
N 586 

76 MOVE xc,yc:GOSUR 466 

386 adreadr+lsNEXT KCI:NEXT yc 
396 RON ERA DIN Ent 2: 60 
SUR 276% 
66% GOSUE 
849 
61e 
&l1 
28 CALL SRROGE: CLS: FRINT CHR ( 
24)" SAUVEGARDE rURete 
4),," éErdition datas"s" — 


MO 
:K 
‘colorier 


Case 


se a jour echelle ji 


une photo 


RER Es CLS: F 


LL 


226: RETURN 


‘sauvegarde d'une photo 


66 


NE 


#BL< 


#DJ< 


+ WE 
>XL< 
> CM£ 


#ENE 
>MP< 
»JQ< 


#CG* 
+ QR<£ 
3 LH 
sHJ< 
#GJ< 


Srauve"," — <Rsetour" 
854 LOCATE 5,16:FRINT CHR$ (24) 
" Mise a jour “:LOCATE Z,1i:FR 
INT" memoire Us CHRS (24) : 60 
SUR 426 
&4% LOCATE 2,16:PFRINT SFACES(I 
3): LOCATE 2,11: FRINT SFACES(1S 
) 
6354 IF NOT INFEY(58) 
E 1686 
66% IF NOT 
674 IF NOT 
ELSE 654 
884 CALL SRBOT:LOCATE 2,16: INF 
UT" Fhoto No :",n# 
89% n£="lphoto"+ng: SAVE n6,b,4% 
A266,1624:G0T0 646 
766 GOSUR 226: RETURN 
769 
7164 
FA 
726 CLS: PRINT CHARS (24) + "CHANGE 
MENT COULEUR "3 CHKS& (24) :FRINT:F 
RINT' — <BrordM," — £6% 1nEkE 6" 
som dr ink AM FEN 2: PRINT" 
ses ink ZI PEN SePRINTM + TE 
ink EM, Li FEN 1: FRINT"  <ENTER 
# Fretour!"s 
754 GOSUR 816 
74% IF NOT INKHEY(S4) THEN vt=b 
o+1:GOSUE 8%6:bo=vt: GOSUER 816: 
BORDER bo 
734 IF NOT INEEYCE2) OR NOT IN 
ÉEY (15) THEN vt=i6+i: GOSUR 8236 
sio=vt: GOSUR 816:INF 6,160 
76 IF NOT INEEY(64) OK NOT IN 
ÉEY (17) THEN vt=iil+1i: GOSUR 856 
siisvt: GOSUR 816:INE 1,11 
774 IF NOT INFEY(6S5) OR NOT IN 
ÉEY (14) THEN vt=i2+1i: GOSUE 8236 
si2evt: GOSUER G16:INE 2,1% 
784 IF NOT INEEY(S57) OK NOT IN 
ÉEY (5) THEN vt=i5+i: GOSUR 856: 
iïsvt:GOSUR S16:INE Zi 
794 IF NOT INFEY(I18) OK NOT IN 
ÉEYC35) THEN 8664 ELSE 746 
864 GOSUR 2263: RETURN 
81% LOCATE 14,4:FRINT"C"S USING 
“hits bos: PRINT") "3 :LOCATE 14,5 
2 FRINT' CMS USING "## "3163 2: FRINT" 
>'"3:LOCATE 14,6: FRINT" €"; USING 
Hs ils: PRINTIS"S 
826 LOCATE 14,7:FRINT"£"S USING 
"Hts is: FRINT "3 "5 :LOCATE 14,8 
s FRINT' CUS USING"'##" 5 133: FRINT" 
3 "3: RETURN 
856 IF vt=27 THEN vt=® 
846 FOR tt=®6 TO 166: NEXT:RETUR 


THEN GOSU 


INFHEY (66) 
INÉEY (56) 


THEN 686 
THEN 766 


‘changement des couleurs 


DFA 


“BL 
RME 


»2NE 
HP 
*QQ< 


»VR£ 


HAL 


 XM< 


Fi 
£40 
55e 
SEE 
Bét IF verilE 
7332 RETURN 
874 IF coli THEN vesvo+iée G0S 
UE 76: col=ts RETURN 
8964 GOSUE E76svorvet+lés GOSUR 
Fé me TURN 
BIS 
54e 
SES 
Ge IF vor 
54 RETURN 
Gi IF coli THEN vorvc-1és GOS 
LE és colrés RETURN 
See GOSUR 276: verve. 1: GOSUR 
Fées RETURN 
520 
PARTS! 
te 
GET 
Ga LF nHomEi 
732 RETURN 
956 IF colel THEN xHcexc4+1@es GOS 
LIÉE écoles RETURN 
780 GOSUE E7Gs Hoemxet+lées GOSUE 
FE RET LIFN 
DÉS 
C7 ca 
che 
71 
GE IF How 
3 8 RETURN 
996 IF colel THEN Kxowkc-1é: GO0S 
LB E7@:colrt: RETURN 
1466 GOSUR E7Gsncere- 16e: GOSUE 
576 RETURN 
LH 
LL 
LL 
1926 CALL BBRGT: CLS: FRINT CHRS 
Ca)" ALLER CASE Ms CHRS € 
245) FRINT: FRINT: INFUT OX (Laëï® 
js" ,kds INPUT OY Claïäist,vd 
1030 hode4 {Ge Cid 1) rvcderli- 1 
E% Cd 1) 
1946 IF col=1i THEN 
cd: GOSUE 
E TURN 
1456 GOSUR E7ésisxcz 
OSUE 276: GOSUE 
1456 
1969 ‘initialisation grille de 
Sa1sie 
1% 1 
1876 ORIGIN 6,6,6,2206,220,6:0CL 


‘deplacement vers le haut 


THEN FRINT CHRS& ( 


‘déplacement vers 16 Das 


THEN PRINT CHRS C7) 


‘deplacement vers la droi- 


THEN FRINT CHES ( 


‘deplacement vers la qgau- 


THEN FRINT CHERS (7) 


‘aller case 


HESXCdIYyCrYy 
H7G:colsé: GOSUER EE6sR 


kcdivce=ycds5 
226: RETURN 


*ED< 
#“ADE 


FE“ 


ce [ie F D 


TO SR: MOVE 6,d#16: DK 
, 1: MÔVE d#16,04 DRAWR 
de RETURN 


D, 12e 
1479 
19864 
LOST 
1496 LOCATE 2, 16: PRINT CHARS (C4 
à "Imprimante prete"; CHARS CEA) :L 
DICATE 6, 11: FRINTUC DEN D" 
1146 TF NOT INÉEY CE4i THEN 112 
[e) 

LIL IF NOT 
& ELSE 1166 
Lie WIDTH 86: FRINTHG: FOR are 
264 T0 &ASFE STEF lé 

1159 date@: FOR pe TO ISsIF FE 

EE Ca+pi THEN datedatæ+ CIAYéR a 
p) 

1144 NEXT p 

1156 PRINTHS, US T NES OH Un d'a € 

LÉRINTHS, MO," 

1160 NEXT a 

1176 LOCATE 2, 1@: PRINT SPFACES ( 
lé) LOCATE 2, 11: FRINT SFACES (1 
é) 

1184 RETURN 

1189 
1176 
1191 
1296 CLS: FRINT 

FFACER 1 
1219 LOCATE 2,5: PRINT " CONFIR 
MATION ss CHRS CEA): LOCATE &6,72F 
FINTUC OZN D" 

LESS IF NOT INÉHEY CE4) 
da 

1EE@ IF NOT INÉEY (ééi THEN GÜS 

LIÉE Sec: RETURN ELSE 1226 

146 FÜR amtA2o TO BASFF: FOEE 
as GINEXT a: ORIGIN 354, 64: CAL 
LL. LAlAG: GOSUR 14764 

1236 GOSUR EG 
LE + RETURN 
LES 

Er ‘quitter 
1261." 

1276 CLS: FRINT 
UITTER - 
12686 LOCATE E,5:FRINT " 
MATION as CHARS (24) 2 LOCATE 
FINT'C O/N D" 

1296 IF NOT INÉEY C4) 
[e) 

1566 IF NOT INFEY (46) THEN GOS 
UE 26: RETURN ELSE 1296 

1216 MODE 1:CALL &RAGE: NEW 
1519 

1124 END@ 


ENEXT 


‘impression des data 


INEEY (48) THEN 117 


‘effacer photo 


CHARS (C4) " Ë 


THEN 14 


How voiles GOS 


CHKS (54) " ü 


CONF IF 
6,7:P 


THEN 11 


2EHX 


> VU 


#ML< 


67 


"J'IRAI CRACHER SUR VOS TOMBES" 
BORIS VIAN . 

Notons au préalable que si cette édition a pour 
auteur Boris Vian, elle fut signée en réalité Ver- 
non Sullivan, célèbre pseudonyme, pour l'occa- 
sion de l'écrivain. Livre déja mythique, il fut l'ob- 
jet d'une adaptation à l'écran que Vian désa- 
voua. Le style irremplaçable de Vian s'y inscrit 
sans hésitation. 


"LA MARIEE ETAIT EN NOIR" 50F 
Souvenez-vous du film de François Truffaut où 
Jeanne Moreau s'amusait à tuerchacun des res- 
ponsables de la mort de son mari... William Irish 
en a auparavant fait un superbe roman. 


"MIDNIGHT EXPRESS" 85F 
Le film d'Alan Parker avait, voici quelques an- 
nées, fait déplacer les foules. Au succès, juste- 
ment mérité du film, succède aujourd'hui un 
livre. En manière d'histoire vécue, fort intéres- 
sante, où nous est délivré le véritable récit de 
cette histoire de drogue qui valut à Billy Hayes 
cinq ans dans les prisons turcs. 


INGRID 
BERCMAN 


"CINE TELE GUIDE" 85F 
Ouvrage parfaitement indispensable à tous les 
passionnés du cinéma. 1 1000 films y sont réper- 
toriés sous forme de petites “fiches”. Indispen- 
sable. 


"MARILYN MONROE" 48F 
Il n'est pas rare de voir en librairie des ouvra- 
ges sur cette star. De l'ouvrage de photos à la 
biographie, en voila un qui recense tous ses 
films et qui nous permet de découvrir un peu 
quelle a été sa vie. 


"LE MYTHE ET LA VIE" 

INGRID BERGMAN 95F 
Ingrid Bergman est une star immortelle. Ce, à 
deux titres ; d'abord parce qu'elle a illuminé 
Hollywood quarante ans durant ; ensuite, parce 
que sa vie, qu'un scandale a éclaboussé, est di- 
gne d'un film. La biographie de l'actrice par un 
écrivain américain. 


"HARRISON FORD" 55F 
Harrison Ford, s'il est un acteur ayant déja 
beaucoup de métier, n'en demeure pas moins 
une star récente. Découvrir une nouvelle race 
d'acteurs, voila ce que l'auteur nous propose. 
En prime, la filmographie intégrale de Ford. 


"FEMME PUBLIQUE" 

AUCE SAPRITCH 75F 
Sapritch par Sapritch, voila un livre qui ne man- 
que ni d'humour, ni de punch, ni de tendresse. 
L'actrice, qui ne laisse personne indifférent, ra- 
conte et se raconte. Passionnant. 


"L'ANNEE DU CINEMA 1986" 185F 
Toute l'année 1986 dans sa version cinémato- 
graphique, avec en plus un calendrier mensuel, 
tant des films que des festivals. 300 pages de 
bon cinéma. 


En désespoir 


"LA ROUTE DES INDES" 80F 
E.-M. Forster nous dépeint là un fait divers : 
une jeune anglaise est agressée dans les grot- 
tes de Marabar. Mais ce n'est qu'une excuse 
pour livrer au public une excellente analyse sur 
la présence des anglais en Inde. David Lean en 
avait fait l'adaptation à l'écran. 


“JEAN DE FLORETTE, 

suivi de MANON DES SOURCES" 

MARCEL PAGNOL 100 F 
A l'heure où Claude Berri parvient, grâce à Pa- 
gnol et à l'adaptation cinématographique qu'il a 
fait de ses œuvres, à faire venir plusieurs mil- 
lions de spectateurs dans les salles obscures, 
voici Pagnol par Pagnol. 


"EN DESESPOIR DE CAUSE" 85F 
Robert Hossein, homme passionné s'il en est, 

nous passionne avec ce livre écrit avec fougue. 

Parmi ses préoccupations, le théâtre bien sûr, 

mais aussi la vie, sa vision des choses. 


GEORGES DEBOI 


Gaby 
Morlay 


du rire aux larmes 


"BIOGRAPHIE NON AUTORISEE" 100F 
Le livre n'emprunte pas son titre pour rien. En 
effet, lors de l'écriture du bouquin, Sinatra as- 
signa son auteur en justice. Mais l'écrivain put 
poursuivre son travail et nous révèle ici la véri- 


Ville : 


"GABY MORLAY" 88F 
Un livre sur une très grande actrice dont même 
le temps n'a pu effacer le nom... Une biographie 
Sur une star des années 30 et 40, avec en exer- 
gue du livre, un mot de Jean-Claude Brialy. 


"CROSS" 22F 
Philippe Setbon a réalisé le film, dont le livre 
est tiré, avec pour acteurs Michel Sardou et 
Roland Giraud. Pour ceux qui n'auraient pu voir 
le film en salle. 


Total commande : 


table vie de l'acteur-chanteur. 
NOM : Ed énom : 
Adresse : 
Code postal : 


Date : 


VISION La Haïe de Pan 35170 BRUZ. 


Port (recommandé PU) : 


Total de mon règlement : 


20,00 x = 


Signature : £ 


Cijoint un chèque libellé à l'ordre de : VISION. Retournez (5) bulletin(s) ou une photocopie à : 


Tn n mn | 


RELIEF 


Georges LAVERGNE 


Le relief dont il est question ne nécessite 
ni des lunettes rouges et bleues, ni un 
bagage mathématique conséquent. Un 
peu d'imagination et une carte superbe 
offrent aux 664 et 6128 un voyage à tra- 
vers les massifs et plaines de France. 
Bientôt, les ‘’cuestas’’ ainsi que les pla- 
teaux n'auront plus de secrets pour 
vous. Le mode d'emploi est inclus dans 
le programme. 


| ah À 


LE reliet, Georges Lavereone UE 


ee MODE 1:CLG: 

sn Se LOCATE À, 

Ma FAPFER @: ÉÛRDE 
5: ON E 


PRINT 
%: UN | 
2 CONT: 


: GO 
46 DIM pi: 


di,cA(tdi, dehx( 


ME 


1,moOMmSÉ 
1. li 


(ESTORE 
aa=i T0 
2NEXT 
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F4 RESTORE As FOR tel TO mi 
EAD plié CET PRE CEE NEXT 

Be RESTORE Sé4és FOR ttæl TO di: 
REÉAD CA CEE SAR CEET CA CEE, deb 
CtEI , fin CELUI KIA CELI VILA CEE), 
GLACE) ,nomÉCEET ER CEE ENEXT € 
È 
96 RESTORE Slét: FOR ei TD IG: 
READ phé$ Ce), pa Cm): NEXT 

169 GOSUR 2866: gene 

116 CLSeGOSUER aude GOSUR LATE: 
exp 

16 MODE La iNE @, @uINE 1, Z6: IN 
FE 5e INF EE, Lés PAPER &: BORDER 

Ge GOSUR 255% 
124 MODE &: GOSUE 

Her CO 

Lé& WINDONW #1, 1, % 


po 


THEN 1486: te 


sWINDOL #7, 
LS OTF ex 
16% 

176 

186 

196 DESSIN 
MIE TS 

1e 


ra 


CARTE 


43 
4e FÜR ai TO SE: 
Caticecé ais debedeb'4 (ais fineti 
mi Cas alenlé Cars vies lé Cas circ 
L'ACa) ss GOSUR EE NEXTs dessine 


CP , EN. 
HRK / CAIIVEV A 


2584 FLOT 545,257,16:DRAW 542,2 
54,16:FLOT 542,186, 16: DRAW 561 
, 184,16: MOVE 552,7 Fs 


:FPLOT 433,252, 16: DRAW 416,7 
19: DRAW 486,366, 16:MOVE 422,34 
4:FILL 12 
Z6ë FLOT 476,288, 16:DRAN 486,2 
79,16:DRAN 516,286, 10:DRAW 544 
.238,16:FLOT 464,272,16:DRAW 4 
94,254,16:DRAW 496,276, 16: DRAW 
512,224,19:MOVE 486,272:FILL 
12 
278 FLOT 352,240,16:DRAN 469,2 
48,1%:DRAN 416,246,16:PLOT 368 
,214,16:DRAW 376,199,16:PLOT 4 
89,224,16:DRAW 568,206, 16: DRAW 
512,189,16:MOVE 384,222:FILL 
12 
284 FLOT 376,166,16:DRAW 286,1 
36,10:DRAW 424, 112,16:DRAW 432 
,B%,16:DRAU 408,64,1%:MOVE 3B4 


70 


sUH< 


#RJE 


+ GHE 


#DL<E 


RELIEF 


,16:FILL 15 
298 FLOT 466 


cé, 1: MOVE 
266 FLOT 55%,14%,16:DRAW 544,1 
60, 16: DRGW 556, 188, 14: DRAW 566 
168,16: DRAW 596,186, 16: MOVE 5 
Su lé: FILL 5 

THEN WINDOUW #1,1,9 
EG: Lieu 

IN WINDOUW #1, 1,6% 
nom 


LEE 


re li 


TROUVER LIEU 


Et Et 

LA Hi, éiCLE #1 

4 RANDOMIZE TIME: nne INT CEND# 
me) +iilF mnilé THEN 46e 
46e PAPER HE, Les CLS #2 
éétis  æexpl 

476 FEN #1, Le LOCATE #1,2,2:FKI 
MTOHIL, PESFAC atel TO jé 


E": FOR 
:NEXT: LOCATE INT #1," 


GOSUE € 


INT OHL, "Trouver" 
396 LOCATE 16,28: PEN 11: FRINT 
LPFPFERS (nommé (nm) 


nets aréiaars 
3264 IF INÉEY (lie THEN 
Li GOSUE ŒELSE 

Lt GOSUE 3e 
46 IF INÉEY (Sie THEN  hosho- 
L'OOSUE 156: IF mel THEN hozho 
+L: GOSUE T156 

4 IF INÉEY (Get THEN verve 
Le GOSUR FISG:IF nel THEN vezve 
+: GOSUR F156 

Jée IF INEÉEV (Sie THEN verve 
L'OOSUR FISGIIF nel THEN vezve 
— li: GOSUE F156 

764 MOVE xl Cn),yl4tmi:FILL 14 
FOR tel TO SO: NEXT:IFILL cil£tn 
FOR tei TO Z@é:NEXT: 

J94 LOCATE 16,25: FEN SsFRINT LL 
FFERS (nomé(nnii:FOR atezi TO Z& 
INEXT: LOCATE 16,25: PFEN 11: FRIN 
TOUPFFERS (nom# (nn)):FOR atzi T0 


hoshot 
nel THEN hosho 


#CRE 


+ QM< 


# XN= 


EGINEXT 


9 IF INÉEY C1iSiæec OF 

m4 THEN &46 

é@e IF INEE"Y Ce) mu 

#0 | 

&lé IF INE 
: GOSUE 

er IF INF 
FEV 

GE GÜTO EE 

&4é IF nmenn THEN GOSUR 4776 EL 

SE GOSUE Site 

ë 5e GOSLE in CCM SLI 

bé FEN HE, Le LOCATE HE, 4,62 PRIT 

BIT OH, "Mes LOCATE 4#E, 4, ee 
HS, "Ste LOCATE HI, Be PEN #1, 

s FRTINT #1, "CHOISIS": FOR à 
TI LARG NEXTs LOCATE 46e, 4, Se FRTA 
THE," Ms LOCATE KE, 4, 16: FRINT 
HE," Me LOCATE HI, Se FRINT #1, 
“ MaFOR atel TO LOG NEXT 


INÉEY (6) 


THEN 26816: 


EvCôaGiæms THEN CLS #i 
OTD &ééä: ‘aban 
THEN LES 


LA cet 


67% IF 


LINE Bis AND  TIHEES 
a THEN &&e 

LFOOINE 
gere DOTE 1: 
EE Mois 
FETE 


}=6 THEN ho=ü:v 
MEN 
: GOTO 


sr mom 


YA TROUVER. NOM 


PRIS 

796 GOSUR See 

EH exe F CE, LIiirCLS His FAFER # 

4,15: 0 'APER Hl,éiCLE #1 

SL GOSLUE ets CET 

Be FEN #1, 1:LOCATE HE, se FAT 

NT #1, "ESPACE": FOR atel TO 166 

"NEXTIELOCATE HIS, Se FRINT #1," 
ULFOR ateil TO 1OG:NEXT: 

BE IF INEÉEY C47) 25e THEN BE 

B4é CLS HSsCLS Hd: GOSUR GEXRE 

ne tPucEtions 

8564 RANDONMIZE TIME 

664 FÜR nbel TO 7 

764 x Cnbi INT ERNDSS ET li IF x 0n 

b)<18 THEN 76 

Se mel 

894 FOR ræe1i TD nb 

GG IF x Cnbiæx (nb-ni 

Di menti 

2 NEXT 

GE NEXT 

646% FÜR nbei TD 


THEN 976 


Fa LOCATE #4,1, 


WE 
#QP< 
#LRE 


>UU< 
>EK< 


2 RN< 
2CP< 


ns FRINT {nb 
Ie NEXT 

GS RANDOMIZE TIRE: ve INT (END 7 
itlisbarlimert 

Gén LOCATE #H1,S8,2:FEN #1, 14s FA 
INT HI, CHARS CEA4Gi 4 Le nom" 

O7 IF INEÉEY (Eden THEN baba 1 
IF baïl THEN bal 

6e IF INEEY Cie THEN baxba+l 
IF bar7 THEN ba=7 

GQ6 MOVE KIA Cu Cyi A4 CH 
ILL SsFOR atei T0 re 
KV) s FOR atel TO Lis NEXT 


#4, UPFFERS (noms (x 


La FAFER HA, 15: FEN #4, Le LOC 
TE #4, 1, mes PRINT Hé, DFFERS (nom 
E Cu éme) ) I +SPACES CLEeLEN noms Cx 
imæ)iii 
LA FAFER HA, :s PEN #4, Le LOCAT 
E #4, 1,bas FRINT #4, UPFFERS (noms 
En bad) +SPACES (Lé-LEN(nomMmé Cx 
baïiio 
é merDa 


à IF INEEY 
jet TMEN Le 
194% IF INEEY THEN FAFER 
#44, Ge CLS #4: CLS #1 : GOSUE 7 
GOT 116% s ab 

1486 IF INÉEY Cétieé THEN GQS 
226: PAPER #4, @2 CLS #ékse PAPE 

Hl,GiCLS Hi: GOSUE 726: GOTO 11 
tin Sol 

11H64 IF INEEY (SG) eût THEN FAFER 
HA, DiCLS #4: PAPER HE, Se GOTO 
j5@e PE 

1474 GOTO #74 

LB IF bars THEN GOSUE 974 E 

LSE GOSUER ice 

1986 PAPER #4, Gi CLS Hée FAPER # 
Fa eiCLS HE: GOSUE 2726: ‘ch&u 
1146 PEN HS, Le LOCATE 4H, 4, 82 FR 
LNTOHS, "HO: LOCATE #2, 4, Lés FRIM 
THE, PSM LOCATE #1,2,2:FPEN #1, 
LiFRINT #1, "CHOISIS": FOR at=l 
TO LOGiNEXT es LOCATE #2, 4, 92: FAT 

NT HE" Me LOCATE KE, 4, 16: FRINT 
HE" Me LOCATE #1, FRINT #1 
ÿ UsFOR atei TO 144 NEX 
T 

Lili IF INEEY CEE) ré AND INEEY 
ét) ire THEN 11600 
LIT IF INEÉEY C6) 

meriLi 

1156 FAPER HS, @G:CLS #£s:sG0T0 86 

és nom 

1146 

1156 

1166 


je (KR INEEY Cé 


THEN 126: 


#FQ< 


ME 


#VD< 


HG 


RÉLIEF 


178& 

| 1:FEN S:FRINT UE 
+CHRS (196) +"EF":LOCATE 17,1: 
PEN 1:FRINT Ti$:LUCATE 18,2:Fk 
INT T2S:LOCATE 18,2:FPRINT TEé: 
LOCATE 16,2:PRINT T48 


: PEN 11: PRINT 
TO Se NEXTeL 
à "2: FOR 


INEEY (47) 250 THEN 1266 


GOSUE 175@ 
FHANDOMIZE TIME: z 
HU +IsTF gelé THEN LE 
6 LOCATE 9,2ÿ$:FEN 
LR# (nomé (2) iweGihazi 

on ANSE É@)æ THEN haha 


= JNT (RND 


Weg:harl 
THEN ha%ha+ 


THEN uw 

é Cris vis FE 

TO LÉ: NEXT: FTLL ci 
5 NEXT 


LS k 2 FILL Ses FOR 
À TO. 10: NE XT:F TLL 1: FOR at 

TO IG NEXT 

IF INEEY CB OR INEEY Cé 
THEN 1426 

A IF INFEY (66) = 


THEN SET: 


THEN LOCAT 

INT “2 FEN 

1:LOCATE 17,12PRINT tü#:LOCAT 

E 18,2:FRINT "  "sLOCATE 18,5 
SPRINT "0 “sLOCATE 9,1: FRINT 

PEN 5:LOCATE é 1:FRIN 

E G,B:FRINT +t7#:GOT 


T tégesLC 
QD) 26564: res 

1446 IF OINEEY CôéSieg THEN LOCAT 
E OL? Is FRINT " Me LOCATE 18, 
SeFRINT " Ms LOCATE 18,3: FRIN 
AL # “: LOCATE GLS FRINT 

Mes LOCATE 16,£s:FARINT " ts LOC 
ATE 9,25: FRINT ef 
FER HS, 02CLS HS: FAFER #1, 6: CL 
5 His GOSUB 2726: GOTO 1446: ab 
LALS GOTO 116 
LABS IF hazr'ä(z) 


THEN GOSUE 3 


72 


:5G< 


“OL 


# TM 


#VNE 


:WF< 


2RF< 


2VG< 
EE 


RELIEF 


19 ELSE GOSUE ne 
LES GOTO LEVÉ: suite 
144% PEN HS, 1: LOCATE #2,4, 82 FR 
INT HE, MMOELOCATE #2, 4, 16: FRIN 
TOHB, "SU LOCATE #1, 2, Ze PEN #1, 
Le FRINT #1, "CHOISIS": FOR at=l 
TO 19%: NEXT:LOCATE HE, 4, Ba FAKI 
NT HE," Use LOCATE #E, 4, Lés PRINT 
HE," MsLOCATE 1,2, 2e FRINT #1 
5" UrFOR atel TO LG: NEX 
T 
145 IF 
Césti re 
Lééi LF 
mi 
1476 PFAFER HE, Ge ÛLES His PAPER # 
L,éi LS 42 
14864 GOSUE 178: JL NL #1, 6 


+ AND INEEY 


THEN 126: 


* GOSUF 
1506 FAFER #6, 11: 
sGLOCATE #6,4,1:F 
TERMS LOCATE Hé, 1,2: 
Ë FAYSAGE": LOCATE 
NT HE, UET LA FHRASE E #6 
us PRINT #6, MA CHEE Us FAFER 
"#i,u: FEN #1,1: CLS #1 
51 LOCAT Fe #1, 4, Lés FRINT #1, ; 
CE": FOR atel T0 SGINEXTs CL 
5 #1: FOR at= TO OLUIENEXT 
1836 IF INEEY (473226 THEN 


Ë Hé, "REL. 
FETNT #6, "LL 
Hé, 1, FAT 


1516 


LS 


à GOSUB 616: instr 
» we@shazl: RANDOMIZE 
ENT CRNDX 6) +1 

& GOSUE 1826: /ecr ph 
6 IF INEEY(@)æû THEN haha 


Fe 


TIME: q 


— 


[RE 


d € 
m 
£ 
Œ 


7 IF Wwio THEN wegihazi 
3 IF INEÉEY (Sie THEN hasha+ 
La te 3 63 
96 IF Wie 


£ 


= 
der 
e 
5 
" 
: 
5 
Lt 
pe 
" 
Le 
a 


HR a ire (JE 


THEN weiééshazs 


lLëété MOVE © 
atel T0 1%: 
æ1 TQ 1G:NEXT 
Lôlé IF INÉEY(1Sieé OK INEEY (é& 
jet THEN lééés test rep 

186 IF INEEY(étieé THEN GOSUE 
7e TE cho 

LE THEN GOSUE 
Zûéû: GOTO 1676: Fey ŒUl 

Lô4é IF INEEY (Get THEN 1676: 
‘aban 

18564 GOTO 156% 

166 IF hazp(gi THEN GOSUR 19 

26 ELSE 1946: ‘bien/+taux 
1674 GOSUR 1966: ch suit 


SéBwrFILL 3: FOR 
XT:FILL 1:FOR at 


#NJT 
“EF 


CHE 


CG= 


1886 IF INÉEY CES THEN Ekkz@: 
E=G@: GOTO 126: menu 
1696 Ekz@G:keGs GOT 15646: ‘suite 
177616 
1716 
1726 
1756 
174 
1756 
1766 
1776 
178% GOSUR SG: FOR ar54 TO a 
she (a) rvevé Cajscecé (a): deb=d 
eb4 (als fineftiné(aisxklenlk(alssy 
lLevléaisciecl'é Cais GOSUE EEE: 
NEXT: RETURN 
1796 Wei FOR noel TO SiFLOT ZE 
Jun Lis DRAW 246,296, Le D 
FAW 246, 526 -n, Lés DRAW GES, F8 
W, LA: DRAW LUS, 290, 1: MOVE ZE 
sos FTILL 1 
1864 IF nne4 THEN wewt+e 
LOLE WwewtB 6 NEXTs RETURN 
1926 sus] 
185G FOR sæesu T0 LENCPhé (gi) 
1844 LE si=eMIDS (ph (agi,s, li 
1886 IF lEis)eCHRS# CES) THEN 18 
74 
1869 péep#+ls (es): NEXT 
18976 FOR sle1il TO LEN(p#) 
1866 118(CS1)=MIDE(pé,s1i, 1) 
18964 LOCATE #1, Cl CLEN Cp#) à 5 / 
cts l, a+ERks PRINT #1, 11#(s1) 
L9GE NEXT 
1916 Ekækk4ls sues+ ls pet 
1986 IF s=LEN(ph#(gi)i+l THEN p 
gets RETURN ELSE 1856 
1956 PAPER #6,3:FEN #6, Le CLS # 
GS: FOR drel TO 1S:LOCATE #ô&,5,2 
 FRINT #6, "BIEN: MOVE SES, TB 
WiFILL Ge FOR atel TO LOG NEXT: 
CLS HG FILL LsFÜR atel TD 166: 
NEXT:NEXTs:biensbient+S: RETURN 
1946 FAFER #6, 3: FEN #6, 1:CLS # 
&: FOR drei TO 15:LOCATE #6,4,5 
sÉRINT #6, ERREUR '!:FOR atel T0 
180: NEXTICLS Hé: FOR atzl TO 1 
GO: NEXT:NEXTs bienebien-1lsLOCAT 
E #6,.5, Es PRINT #6, essaie ":LO 
CATE #6,.5, 4: FRINT #6, encore": 
FOR atel TD GG: NEXT: CLS #6 
1959 GOSUE 2616: GO0T0 156%: ‘nou 
V B5S 
1964 IF bien£é THEN bienz& 
1976 DE=STRSE (bienis: FAFER #6,5: 
CLS Hé: FEN #6, 14: LOCATE #6,5,1 
:FRINT #6, "GC: PEN #6, &: LOCATE 


to 
n 
mn 
tn 


# ZUE 


>AQ< 


»XR< 


>UT< 
#WU< 


Hé, 7 li FRINT #6,b#:LOCATE #6, 
2: FRINT #é, "ENUM:LOCATE #6,9 
2: FRINT #6, "UITE" 

1984 CLS Hi: FEN Hé, LiLOCATE #é 
sl 2 FRINT #6, "MM: LOCATE #6,8, 
ZsFRINT #6, '"S":LOCATE #é6é,£5,4iF 
RINT #6, "CHOISIS": FOR at=i TO 

SO: NEXT:LOCATE #6,1, 2: FRINT #é 
5" MiLOCATE K#6,8,2: PRINT #6," 

Mr LOCATE #6, E, 4: FRINT #6," 

Me FOR atzil TO 2ésNEXT 
199% IF INEÉEY CES) << AND 
(ôGiiré THEN 1986 
2606 RETURN 
2416 FAPFER Ké, 6: FEN #6, 118 CLS 
Hé: LOCATE #6, L Li PRINT #6, CHARS 
(246) +HCHRS CLA4L Is LOCATE #6,2,2% 
FETNT #6, "As LOCATE #é, 2, is FRT 
NT #é, "Ste LOCATE #6, 1, 42 FRINT 
Hé, "AU: FEN #6, 12e: LOCATE 6,5, 1 
st FÉINT #6, "et ENTER'!EsLOCATE #6 
ss PRINT Hé, es ABANDON"E LOC 
TE #6 SE 
Lase PRINT #6, M REFONSE Ms LOCA 
TE #6, 2, 4e FRINT #6, "REVISION 
Ms RETURN 
2080 FAFER #G,ZIFEN #6, 1:CLS # 
és LOCATE #6,2, 22 FRINT #6, "SOLL 
TION" 

2646 FOR ertel TO 15:MOVE 
ES -sée CFA Coq s FILE Es 
æl TO ISGsNEXTIFILL LiFOR atæi 

TO IG: NEXTENEZXT 
24564 RETURN 
2660 FAFER #6, FEN #6, LiCLS # 
&rCLS Hi: LOCATE #6, SE, Le FRINT # 
é4 "REVISION": LOCATE #é, 1,3: FAT 
NT Hé, MENTER- 5 3 LOCATE #é, 1, és 
FÉINT #6, MESFACE- SU FEN #6, 11: 
LOCATE #6,8,3:FRINT #6, "suite" 
:LOCATE K#6,9, 4: PRINT #6, "#in" 
2676 Eskæ+l:kkré 
2686 IF E=S1 THEN FAFER #6, lé: 
CLS Hé: FEN #é, 11: LOCATE Hé si, 
*FRINT #6, "REVISION": LOCATE #6 
nos PRINT #6, "TERMINEEMS: FOR À 
Teil TO SGG6:NEXT: RETURN 
29964 RANDOMIZE TIME: hh4 CES = INT 
CRND&T EG ) +1 
2166 næl 
2116 FOR Fræe1 TO E 
S1E6 IF hh£ CE) =hh4 (k-n) 
(CLIS 
S1E& nen+i 
2148 NEXT 
2159 g=hhÂ(k): GOSUEB 18264 
2164 MOVE SES, Lé9-S6x (F4 Cq)—-1) 
2FILL T:FÜR ATS=1l TO I1GG:NEXT:F 


INÉEY 


THEN © 


*EW< 


#HC< 
#HD< 


Ne, 
sJJE 


# THE 
#RL£ 


73 


ILL 1:FOR ÀTeæl TO Z@G:NEXT 
2170 IF INFEY(18)=@ OR INEEY(Cé 
1e THEN CLS #i:G0T0 267% 
21686 IF INEEY(47)=% THEN RETUR 
N 
219% GOTO 2166 
26e PEN #2, Z:LOCATE HS, 1,2 FR 
INT HE, TROUVER‘! : LOCATE #5,4,5 
SPRINT HE, LES LOCATE HI, SL, 7:F 
FINT HE, NOM" 
216 PEN #4, le LOCATE #4,1,£: FR 
INT #4, "Choisir le"s:LOCATE #4, 
LS: FRINT #4, "nom de la":LOCUAT 
E #44,1,4: PRINT #4, "zone bleue" 
sLOCATE #4,1,SsFRINT #4, "dans 
une UsLOCATE #4, 1, 6: FRINT #4, 
"liste de 7"sLOCATE #4,4,7:FRI 
Ii PL: 


re 


 . PEN CHE, Se LOCATE HS, TL, IFR 
ENT OHE, MCHOTI Xe PEN #2, 14: LOCAT 
E #5, à, Le PRINT HE, CHRSE (246) 4+CH 
FR C2413 2 PEN #5, 14: LOCATE #5,1, 
He PRINT HE, ENTER‘: PEN HS, cs LO 
CATE HE, 1, és PRINT #5, pour "ts Lo 
CATE 42,1, S:FARINT #5, "VALIDER" 


2246 PEN HE, Se LOCATE #5,1,6:FR 
LNTOHE, PAU PEN HE, 1e LOCATE #2 
5 2 Gi FRINT #E, CBANDONM:FEN HE, 
Be LOCATE HE, 1, 2e FRINT HE CRUE 
EN HE, Lis LOCATE HE, 52, 73: PRINT # 
2, "EVISER': PEN #5, 2: LOCATE #2, 
4, 83 PRINT HE, SU PEN HE, Li LOC 
ATE HE, 1, 9: PRINT #5, CREFONSE" 
Se56 RETURN 
sed FAFER #S 
Le LOCATE HE, 2 SPRINT #3 “VOIC 
Le LOCATE HE, CE, Se FRINT HE, "LA" 
sLOCATE HE, 1, 7: PRINT #5, CRKEFON 
GE" 
SE7e CLS Hi: LOLCATE #1,1,2:FKRIN 
T #1, "SOLUTION" 
22800 FAPFER #4,15:FEN #4, Le LOCA 
TE #4,1,bas PRINT #44, UFFERS (nom 
# Cx (me) )) +SFACES C1-LEN (nommé 6x 
(bai) 
22964 FOR aat=l TO SG:FAFER #4, 
a PEN #4, Le LOCATE #4,1, y: FRINT 
#4, UFFERS (nom# CX Cv) ))+SFACES ( 
LE-LEN Cnhom# Ce Cv) eMOVE HI CH 
(y), vil AC CI) sFILL S:FOR atri 
TO 1G:NEXT:LOCATE #4,1, va: FRIN 
T #4," MaFILL cirék y 
J):FOR atzl TO 16: NEXTENEXT 
2548 RETURN 
BE16 FEN ls: FOR aatr1i T0 15:L0C 
ATE 17,25: FRINT "OUT": FOR atzl 
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#JF£ 


HG 
+ THE 


+ QJ< 


#QK< 
2PLE 


sUM< 


# XN< 


BLF< 
AGE 


TO 194: NEXT:LOCATE 17, 23: FRIN 
ULFOR atzil TO 166%: NEXT:N 
EXT:biensbientS:LOCATE 9,25:FR 


INT " a RETURN 
EESG FEN 1:FOR aatz1l TO 15:L0C 
ATE 17,23: FRINT "NON": FOR ati 
TO 166: NEXT: LOCATE 17,23: FRIN 
LR MaFOR atzil T0 14G:NEXTEN 
EXT:biensbien-1l:ERKREURSserreurt+ 
1:G0OT0 1516: ‘nouvel essai 
BEES LOCATE 9,1:FRINT " ‘ 
LOCATE 9,2Z:FRINT ° s 
2546 FOR aat=i TO Z6:FEN 2:LOC 
ATE 14,1: FRINT t5$#: 
2256 MOVE BED,268-56% (ré Cz)i-1) 
FILL € | 
2564 MOVE HlACzi VIA (CR) iFILL € 
2576 FOR atzi TO SG: NEXT:LOCA 
TE 14, Les FARINT ©! "MOVE 2232, 
568-86+% (Fr4(2)-1)2FILL is MOVE x 
12(2),Y124(2)3FILL ci4(z):FOK a 
tel TO 166: NEXTINEXT 
2296 LOCATE 9,lLsFEN SeFRINT UK 
EU+CHRS (196) 4+"EF "es LOCATE 16,2%: 
FRINT t4$:LOCATE 9,25:PFRINT " 
eGOTO 1296: retour Fr 
elief ° 
2EGOG INE G,@sINE 1,26: INE &, 15 
LINE E, 11: BORDER &: FAFER 6: FEN 
1: RETURN 
24464 INE 6,6: INF L,@sINE GT 
NE CE, G: FAFER &@i ÉÉRDER GE RETURN 


2416 FAFER G:LOCATE 1,1:FEN &: 
FRINT "le logiciel sducatif de 
stins aux enfants de 8 LC 1£ an 
s se propose de tracer les gra 
ndes lignes du relief de la Fr 
ance, " 

242 LOCATE 1,4:FEN Le FRINT MIT 
1 s'agit d'une approche, aussi 
les dsfinitions et trac:;s en 
sont-ils volontairement simpli 

fiss." 

2456 FEN S:LOCATE 8,8:FRINT "4 
activitss sont propos:es":FEN 
Ses LOCATE 4,9:FRINT !--Trouver 
le lieu sur la carte. 
Trouver le nom d'un lieu. 

—--Friciser le relie 

F. ——Kelier 

texte et paysage." 

2446 LOCATE 1,15:FEN L:FRINT " 

Utiliser les fl@ches pour 1e 

s diplacements, puis valider 

la solution retenue avec ENTE 

FR" 


# XHE 


Le F* J cs 


#NEE 


#WL 


> WM< 


# QN< 


# HP 


*GQ< 


# BH 


#MJ< 


PES 


#HL= 


245 LOCATE 1,19:FEN ZesFRINT ° 
S donne la r;ponse.":LOCATE 1, 
BG: FRINT "A permet d'abandonne 
Fa "sLOCATE 1,21: FRINT CK perme 
t de riviser...":LOCATE 1,28:F 
RINT MSC est le score (S pts p 
ar bonne rsponse diminu;s du n 
ombre d'erreurs), 

2468 GOSUR 2596 

2476 FEN 1: LOCATE 17,25: FRINT 

MESPFACE": FOR ATel TO LOG: NEXT: 
LOCATE 17,2Ss:FRINT " Ms FÜ 
FR AT=1 TO Sé:sNEXT 

24864 IF INÉEY(47)2%@ THEN 476 


2496 RETURN 

23464 INE 6, &G:INE 
GrINE 5,6 

2516 FOR al TD dinHenxk(aisyey 
Atalicec (a): deb=deb# (ais fine 
inCalsnienl (als vlieyl4 (aiicis 
cl (a): GOSUE EXF6: NEXT: ‘dessin 
e 

2624 FEN S:LOCATE 8,16: FRINT 1 
av#iLOCATE %,1S:FRINT "G LAVER 
GNE'"': LOCATE 4,Z1:FRINT "'presæen 
te": LOCATE HE, 2: FRINT FRELIEF" 


1,26,6:INE À, 


28%6 LOCATE 1,2S:FRINT " 
Ms INE OO INE 1,26: INE 2,11: 

INÉ %,2: BORDER 6:FAFER &: 

2646 FOR ATei TO 5666: NEXT:RET 

LIEN 

2666 CLS: PLOT 1,2606,2:DRAW 6% 

, 200,2: DRAW 629, 100,23: DRAW . 

DO, 5: DRAW 1,200,2%: PEN Z:LOCATE 
7,12:PRINT "ETES-VOUS UN NOUV 

EAU JOUEURT" 

256% LOCATE %4,12:FRINT "9": F0 

FR at=i TO SO:iNEXT: LOCATE 4,15 

PRINT "2: FDR atzi TO SO:iNEXT 


2576 IF ré AND INFEY 
C4) ire 
23e IF 
el 

2890 CLS: FEN S:LOCATE 15, 7: FRI 
NT VOTRE CHOIX "eLOCATE 8,15:F 
EN ss FARINT MI Trouver le li 
aus "tLOCATE 8, PARENT 8 == T 
rouver le nom, !"sLOCATE S,19:FR 
LNTOUCE ee Trouver le relief," 
LOCATE SSI: FRINT 4 - Kelier 
texte et paysage." 

2ôéte FEN :LOCATE 15, /3:FARINT 
VOTRE CHGTK "FOR at =1i TO EG: 
 EXTILOCATE 15,72FRINT " 

Ua FOR atel TO ZésNEXT 


INÉEY C4) 
THEN 2566 
INÉEY CZé4i = THEN BIEN= 


>PM< 


»NNE 
#RP< 


#NQ< 


+XR£ 
NH 


#GJ< 


#EF.< 


»JL< 


#RNE 


ARE 


HI 


& AND INEEY 
+6 AND I 


2619 IF INÉEY(64)<;: 
(65) ire AND INEEVY (573 
NÉEY (S6)<456 THEN 2660 
2626 IF INÉEY(&4)=6 THEN exil: 
FOR aat=1i TO 6: LOCATE 8,15:FR 
INT Is FOR atel TO S6: NEXT:LO 
CATE 8,1S:FRINT " "sFOR atzi T 
QD SO:NEXT:ENEXT : RETURN 
2654 IF INÉEY(65)=6 THEN exz£: 
FOR aat=1i TO Z@:LOCATE 8,17:FK 
INT "EU: FOR at=i TO SG: NEXT:LO 
CATE 8,17:FRINT " UsFOR at=zil T 
D SG: NEXT:NEXT: RETURN 
S&46 IF INEÉEY(S7)e6 THEN ex: 
FOR aatei TO 26: LOCATE 8B,19:FK 
INT CES FOR ate=il TO S6é:NEXT:LO 
CATE B,18:FRINT " U:FOR atel T 
Q SG: NEXT:NEXT : RETURN 
2659 exrds FOR aat=i T0 S@:LOCA 
TE SSZLsFRINT MU FOR atei TO 
S@s: NEXTeLOCATE 8, S1s FRINT 0 
FOR atel TO SG: NEXTeNEXT: RETUR 
NI 
éd CLS HE: LOCATE HE, 1, 1: PEN 
HE LE PRINT #2, CHRS CS46) +" M4+CH 
FRS C4 1) + RCHARS CEE) + CACHE S 
CRE) 2: LOCATE #4, Ge PEN #£,é&iF 
FRINT HR, Mets LOCATE KE, , 5e FRIN 
El #2 LA RANER à 
INT #2, ENTER": PEN #2, 6: LOCATE 
2,4,6:PRINT #2, "=": LOCATE #é 
La PEPRINT #2, VALIDER" 
2686 FEN HE, le LOCATE HE, S,loiF 
RINT #8," =": PEN #2, 6: LOCATE 
HE, LL, IL PRINT #2, "ABANDON" 
2696 FEN #E, 1: ile #25, 133 F 
RINT #2,°6 &3 LOCATE 
He, LL, 14: FRINT (#2, "REFONS Es FEN 
#2, Li LOCATE HZ, lé: FRINT #4, 
MR OU PEN HE, ue LOLATE #2, 1,17: 
FRINT HE, MREVISER’!:FEN #2, Gi LO 
CATE HS, SE, Dés PRINT #£, BON «LD 
CATE HE, 1,21: PRINT HE, "VOYAGE" 


27464 RETURN 
27164 bilan tableau suite 
2724 IF bienié THEN bienré 

6 BEESTRS (bien): LOCATE 18,5 
SiFRINT ° Me FAFER HE, 
BsCLS His PEN HE, Se LOCATE HE, 4, 
Be FRINT #E,b$: PEN KE, 1: LOCATE 
H2,Z, 2: FRINT #£, "SCs" 
274 FEN #2, le LOCATE HE, 4,82 FA 
INT HE, MU PEN HE, Se LOCATE HE, 
E, LG: PRINT HE, "MENU FEN HE, le 
LÜOCATE HE, 4, lé: FRINT #H£, COUPE 
MN OHE, Se LOCATE HE, 2, 19: PRINT #4 


HER E 


#AL£ 


3 JM 


#TNE 


»2R& 


ET 


# JU 


+ QE 
FIL 
NM 
EN 


5 MP< 


4 "SUITE" 

27564 RETURN 

ET Et bonne reponse 

2776 FOR aatel TO lésLOCATE #1 
vus PEN #1, Le PRINT #1, CHIENS: 

FOR atæei T0 18: NEXTe CLS #ls FO 

FR atel TO LéésNEXTeNEXT 

2786 biensbienti: 

27696 RETURN 

LEE solution demandes 

2916 CLS His PAPER Hi, SaCLE #és 

PEN HS, és: LOCATE HE, 2, He FRINT # 

&, CMOICT'sLOCATE #8,5, 16: FRINT 
CHE, MLAte LOCATE #2, 1,18: PRINT 

HE, CREPFONSE "s LOCATE M1, 1,2 FAI 

NT #L, SOLUTION" 

2856 FOR attel TO SZ: MOVE Hi 

nn, vlktnn)sFILL E:FOR ati T0 
1H: NEXTEFILL ciéinnis FOR at 
LOTO LG@: NEXT: NEXT 

2826 LOCATE 19,25:FRINT " 

MaÛLS Hl:sGOTO 5%: choix 

gui te 

RES éF Et revision 

2964 IF enr THEN hom@:s veine 

ges ardiaarSs GOTO 2966 

He CLS Hs LOCATE HE, 1, Li FEN 

HS, Le PRINT OS, CHARS C4) + CH 

FE CAT) 4 CHARS CHAN) HO U+CHRS 
CSA) s LOCATE HE, ES, GePEN KE, &iF 

FINT HE, pour !sLOCATE HE, Sir 

FLNT CAE, BOUGER": 

2070 PEN #2, le LOCATE #2,2,0:FA 
INT #2, ENTER": PEN #2, 6: LOCATE 
H2,2,G: PRINT #2, "pour ts LOCATE 
HE, LG: FRINT HE, "le NOM" 

2906 FEN #2, 1: LOCATE #8,1,14:F 

ETNT #2, "ESPACE": FEN #2, 6: LOCA 

TE CHE, 2, 16: FRINT HE, “pourts LOC 

ATE H2,1, 16: FRINT HE, CARRETER" 
PEN HE, Ge LOCATE HSE, Ge FRINT 
He, "RON: LOCATE HE, 1,218 FRINT 
#2, "VOYAGE" 

296 HO VER Ge nest armés aa C 

LS His LOCATE HI1,1,S:FEN #Hi,2sF 

RTNT #1, REVISION MeLOCATE 16, 

253: FRINT ?! L 

26% IF INEEY (lie THEN  hosho 

+: GOSUR HIS IF nel THEN hozh 

ol: GOSUE F1564 

291% IF INFÉEY(E) = THEN  hosh 

ol: GOSUER IS: IF nel THEN hoz 

hoti:GOSUER 156 

2986 IF INEEY (Ge THEN  vezve 


le GOSUR FISG: IE nel THEN vez 


e+i: GOSUR 5156 
2956 IF INÉEY(2)=4 THEN verve 
+Ll: GOSUER HISGIIF nel THEN vezv 


76 


#WQ< 
2GR< 
»MT< 


HU. 
AVE 
#RL< 
»BM< 


CPE 


#UQ< 
2 TRE 


2FT< 


NUE 


#GV< 


2HN& 


:WQ< 


els: GOSUE 156 
2944 IF INÉEY(18)=6 OK INÉEY(& 
jet THEN 986: donne le nom 
29564 IF INEEVY(C47)et THEN FAFER 
HS, GeCLS HS: FAPFER Hi, Ge CLS #1 
sGOSUR E726Gi0LS Hls GOSUR ES 
‘retour choix 
2986 MOVE HI (ni vins FILL & 
FOR atel TO 1ésNEXTIFILL ci 
nisFÜR atel TO Z&G:NEXT 
2976 GOTO 2946 
2984 FOR attel TO 1&éisFEN £sLOC 
ATE 16,29: FRINT UPFERS CNODMS& Cri 
JaMÔOVE HI (ni  vl A Cnm) si FILL € 
2996 IF exe THEN MOVE 
mé Cr Cris FILL # 
Ho FOR atel TO SG:NEXT 
alé PEN cl'é(nisLOCATE 16,%SsF 
FÉINTOUPPERS CNÜOMS Cm) he MOVE HI 
n),yYlAiniiFILL clx (ni 
BASE IF exe THEN MOVE ES, Lér 
piété Cri Cnie1i)sFILL 
GES FOR atel TO SG:NEXTINEXT 
24 LOCATE 164,25: FRINT ° 
MsIF exeË THEN 28564 ELGE 


29896 
Basé IF exel THEN FAFER #1, é10 
LS #1: SOÜTO 666 
PAG IF exe THEN FAFER #1, és 0 
LS #1:G0T0 1196 
674 IF exrË THEN LOCATE 17,1: 
FRINT " MaLOCATE 16, Le FRINT 
Se Me:LOCATE 9,2: FRINT " 
Ma FAFER #1, Si CLS #l: GOTO 1444 
1 Fetour Choix 
& RETURH 
É reponse TaUsSE 
s FOR aatel TO 16: LOCATE #1 
nes es PEN HI, Le FRINT #1, "ERREUR 
Us FOR atzl TO IMG NEXTICULS HI 
FOR atel TO 16e: NEXTsNEXT 
ELLE erreuregerrgeur+li:bienrbien 


2136 IF exel THEN LOCATE #1,4, 

Be FEN HI, Lés FRINT #1, "Trouve-: 
"es GOTO SE: ‘nouvel essai 

BLEG IF exe THEN LOCATE #1,4, 

ZeFEN #1, 14: FRINT Hi, CHARS (40) 

+ Le nom: GOTO 976%: nouvel es 

Hal 

5146 deplacement zone 

5156 neve’ (atve,aathoisFOR tel 
TO 196: NEXT: RETURN 

F6 DATA ce pic est inaccessi 

blé ,i,paysage des Vosges ,4,% 

aste tendue plate et slevie , 

E,petit mont au sommet arrondi 
«+,paysage essentiel du bassi 


OR 


#MT< 


# BU< 


# FU 


UE 


sx Je 


AN LES 


ELLE 


2 TME 
NN. 
»GE< 


#DF< 


2 TG< 


# 2H 


FGE< 


n parisien ,5 
7176 DATA ces sommets sont cou 
verts de neiges ;ternelles ,i, 
ce sont des montagnes ancienne 
5 ,2,compos:s de calcaire il es 
t souvent assez sec ,5,roche d 
ure de Bretagne culminant LC 4& 
9 mêtres ,4,r;gion au sol fert 
ile ,5 
3189 DATA les glaciers transpo 
rtent des pierres ,i1,r;gion au 
* sommets us;s et arrondis ,%, 
ceux du Limousin et des Causse 
s sont diff;:rents ,3%,grosse bo 
sse de terre peu ilevie ,4,1les 
rivi@res y coulent lentement 
52 
3196 DATA chaine de montagnes 
jeunes ,i,montagnes vieilles , 
2,les Causses sont percies de 
gorges profondes ,2:,autreftois 
on y batissait le chateau-+#fort 
.,4,paysage digags; on y voit € 
r@s loin ,5$ 
3266 DATA le Mt-Blanc culmine 
L 4867 mêtres ,1,les sommets d 
es Vosges sont appel:;s des bal 
lons ,2,1le Limousin est humide 
et verdoyant ,%3,autreftois les 
villages s'y installaient pou 
r se d;fendre ,4,1es champs 50 
nt grands et les cultures vari 
5,85 ,9 
216 DATA muraille s;parant la 
France et l'Espagne ,i,on y t 
rouve d'anciens volcans appel: 
S puys ,2,fait de calcaire il 
est pauvre et sec ,,paysage d 
e Normandie ,4,ce paysage est 
celui du ÉHassin Ââquitain ,5 
H2E6 dessine carte 
56 FLOT x,y,c:FOR tedeb TD + 
ins DRAW PLACE) PLACES , CE NEXT: M 
OVE K1,VYi12FILL cis RETURN 
3246 ‘data differentes zones 
F256 DATA 1,1,1,1,1,1,1,1,1,1, 
1 
2266 DATA 1,1,1,1,29, 28, T1,S2, 
1 1, 1 


18, 15,25, 1 

3286 DATA 1,1,49,49,58,24,24,7 
4,12,12,1 

22986 DATA i,i,55,51,51,24,24,2 
3,12,12,1 

2306 DATA 1,1,29,14,14,25,25,7 
2316 DATA 1,1,29,46,15,16,16,2 


> TM< 


#LN< 


2PG< 


BH 


5,26,11,1 

3326 DATA 1,1,2%6 
9,11,11i,i 

2226 DATA 1,1,36,28,:6,18,18,4 
4,45,47,1 

2346 DATA 1,1,1,37,1%,43,43,44 


.36,41,17,1731 


5423346, 1 

HES6 DATA 1,1,1,14,16,472, 42,1, 
1,141 

HE66 DATA 1,1,1,1,1,1,1.1,1,1, 
L 

É576 ‘data coordonnees carte 


3386 DATA 448,:96,448,768B, 416, 
252,4006,2%6,410,228,392,228,%7 
9,333 SR 
242,252,246,2%6,250,225,:56, 
4,242,304,240,2106,234,264,7 
312,310,320, 296,320, 296,512, 26 
9,308,258,206,270,296,258,288, 
276,276,276,276, 200, 264,262,25 
6, 318,254 
2396 DATA 218,248,2::0,246,226, 
222,224,216,256,2064,256, 180, 36 
8, ie no 146, 


2h, 489,62, dd ne LR do de 
.698,84,624,88,632,164,624, 11 


1466 DATA 608,117, 604, 176,616, 
132,66, 144, rs boa, 172, 6ù 
8,184,5 5 
in 604, 
»,639, 215 
528, 500, S: 


25,216, 506, 220, 588, 
SIA CSA, SAN, ESA, Su 
, O8, 01e, 168,508, 
276, 492,290, 44, Gé, 48e 


3410 DATA 464,40,464,4B, 448, 
.457,68,416,64,48@,64,%B4, 
72,76, 268, LB, 358, 72, 356, 64: ‘ Py 


F4 DATA T&B, 142,276, 1H, 9, 
124,418,168, 428,82, 442, 72,7% 
74, 466, 27e sv AE, 7€ 
,426, 108,2 
48,268, 166 
BAG DATA : 
256,292, 244, 4 
4,256, 480, 22 


“2 


364, iber 3e 


% 514, 
514,208, 400, 


228, A7 202 881s 
Es 248, ds 00 y T66 
226,246,2%0,244: "lo 


2446 DATA 416,2327,476,228, 474, 
236,426,276, 432 


28,448,2:08, 46 


CRE 


SVHE 


DRE 


»YME 


77 


248,522,226,538,22? 


RELIEF 


3636 DATA 566,184,514,184,518, >EN< 
174,566,152,566,137,518, 126 
3646 DATA ont WF < 


204. AGA, 304, 4 
331,42 B, 251, 
£ +4, 5 


86,958, 96, 825,12 2BN£ SE4, 
M,548,144,528,156,544,176,356%, 4, 25.376.312 L 
178,576, 192, 606, 2089, DR AMG, 04, 46, 289 
4,208, à] re do 575,196, 266 DATA 44,716, 418, 
Sos, 174,546, 174,528, 192: : 4 lé, ee 
! 1e. 120,540, 06,520, 8 “87% DATA 448,758, 
4, ès rh 6 468, LEE, 448,236, 
3 DATA 4 BEA, 4% LUS : 186% DATA aë4, 184, 472 
ré 8,268: epn 360,480,252, 464, 368, 448, 376 
EG4,287,300, 6, 2 : 1696 DATA KT. 
n,272,2069, 271 “ DATA 
ni re 464,788, 472, 288, 
é . 
HP16 DATA 472, 164, SI, EMA, SI, se vYME 
Fe, Me 


66, LAS, 


age DATA 3568, "l'6smu, FRE 
154,549, 126,570, 96, 500, 36,396, 
DA, 608, 100,616,106,626,94: al 
496 DATA 496,176,474,198,448, GT 5 
164,462,126,467,1%4,468,94, 456 DATA 2568,94,292,86,406,8% JR< 
.86,486,80,528, 112,526, 168,537 34, 76 
nr 74,508, 124,568, 152,5 766 DATA 416,164,420,86,298,8 *ET< 

18,172,512,192: "mc (e) 
2509 DATA 576,246,566,224,554, :JJ< 5774 DATA 27%,198,384, 420%, 404, XL 
268,546, 184,584,2068: "3j 176,262, 164 
#516 DATA 648,298, 600,2688,584, FE 2784 DATA 4% ne: 
208,576, 272,592,766,4668, 268,66 144, 417,128, 266, 17 

3025 vo 2798 DATA 454,117 “QUE 
. 472,202,428,188,418, *UL< 2866 DATA 472,48,464,58,490,55 FM: 
156,458, 156,456, 169,476, 176,48 
Fa s: ‘li 581% DATA 456,64,455,72,486,76 :LNE 
556 DATA 124,452,116,496, UM£ 456,64 
l£é,4%6,166,48%, 182: ca 3826 DATA BF< 
254% DATA de ie don doi ou ,524,98,53%4,96,516, 
2556 DATA 476,1%6,486,96,488,8 : à 2826 DATA 538, nue 6,544,11 EG 
8,548,96,496,112,564,117,498,1 2,5564,112,566,06,554,08,566,86 
ETES , 555, 66 
2560 DATA 466,94,456,86,486,86 EQ*< 5846 DATA 574,66,586,72,596,71 *DR€ 
488,92: mn , 592,96 
5576 DATA 528,112,528,126,526, >RR< 2956 DATA 60B,86,626,96,622,98 HT: 
128,506, 112: ce 
FS86 DATA S56,172,528,17  . #GT< 3869 DATA 556,266,546,256,546, EU 
165,526,146,524,126,526 128: 262,568,287 
i 5876 DATA 292,254,426,258,4%2, TV 
5596 DATA 544,192,536,2762,528, >FU< 268,478,277,188,277,2186,764 
200,528,192,528, 176 2886 DATA 464,728,478,250,456, :LW< 
E668 DATA 529,7212,546,226,556, >ME< 268,452,252,416,246 
222,536, 206 3896 DATA 4%2,2068,474,214,486, 2PFX< 
2619 DATA 5%6,226,542,226,548, QL< 24,477,251 
234,546, 224 <9ûû DATA 528,:44,542,%42,542, XN< 
3626 DATA 516,222,502,2:4,512, *EM< 296,528,272,516,322 


36 nr 208, 252 
F4 DATA Léôé, 176, 406, 112,558 
4 DES, 558 


78 


se 916 DATA oo 


nes, 4 
m5, HO s 2 


2e DATA Le 


“r 
Ce je CRETE Ag de 4 ty 


Dé, 10, 282 
4, 6 


169, 174, ; 
Wire 7,4 
a 4, 


3986 DATA 1, 160, 2 
1,86, 


"104,164, 


142 00146, 108,142, 


.,154,156, 
lé F4 1° 


ME 


DIRIRES 


HR 


#BT£ 


#UW< 


45, 64,45, 464,46, 1,46%,184, 4 M 
564 196,52, 112,58, han ie 
.lé64,5 4, 176, 106,52, 2 
68, 54,216, 52, 223,64, 8,52, 12,62 
5 sb y Sy 40 Le 46, 46, 71, 
=, 56,28, 6: F 
41e DATA SE,40, 
«48: plaine 
| RARE 


25,46, 56, 64, &4 


AGE DATA 


D do = a 00e à 2 04, 
,24B,272,272,254,:04, 16 
8.272, 58.380,12 440 4,448,40,© 
46, So, Dé 600, 06,508, 164,56 
%,184,544,176,5090,222,60006,2898, 
DO LES, ARS, EQ 

16 DATA 64,2844,74,228,2:44, 16 
SE 4 . 
», 48, 268, 208 
Ps 66, LG, Hé, TUE, 
58,206,2027,80,282,%18 
Ge, GE, IEA4, dé, O4, LA, EG 
59 
ét SYMECIL 
sos bé 
HS SYMBOL bé, LE, Gé, bé, 124, & 
&, 66, 184, 
AG SYMEOL 67, 60, bé, &ét, dé, 64, 
bé, 664, € 
4e 7 à D GE, 126, GE, dés 66 Gé 
68, 126, 
4466 UE 
4,64,176,6 
46456 oo FA LEA, ét, ét, L'ILE, & 
4, 64, 64 
41e S MEBL, 
bé, 68, & 
4116 SYMEBOL FE, dé, dé, dé, lé, 66 
nés 66, À 
4126 SYMEUL 
lé, 56,6 
LES SYMBOL 74, 4 
Dé y € 
4146 SVYMEOL FE, 70, 72 
FE, 76,6 
4156 ds LOTS y te mes ts CS 
HE, 66, 
TL 66 LE HaoL FF Ë 
.66,66,% 
4176 SYMEOL 75,66, 98,65, 74,76, 
bé bé 6 | 
4186 SYMEOL 79,60, 66, 66, 66, 66, 
bé, 864, € 
4199 SYMEOL 86,56, 868,88, LEO, &4 
164, 64, € 
4200 SYMEOL 81,6 
ëE 38, Éi 
4219 SYMEUL 88,66, 66, 606, 124,88 


65, 60 66,66, 176, 66 


69,126,64,64,124,6 


71,62,64,64,78,66, 


7%, 564, 16,16,16,1é6, 


44,68, 68,68, 


sis, ve, és és 


D,66,66,66,74, 


sBF< 


MH 


79 


166, 66,6 
2264 GSYMEOL 
6, 66,6 
AETS SYMEOL 
.16,16,6 
4246 SYMEÛL 
bb, 68,6 
ASE SYMEBOL 
so, 24,6 
4264 SYMEOL 
112,66, 
476 SYMBOL 
bé, 66, 6 
4286 SYMEUOL 
16,16, 
4294 SYMEOL 


,126, 6 
4568 SYMBOL 
58,0 

4516 SYMEOL 

6,56, 6 
4:29 SYMEOL 


,28,6 
43 SYMEOL 
6,28, 6 

4548 SYMEOL 
2,28,6 

4259 SYMEOL 
22,29,6: "4 
4569 SYMEOL 
8,4,56 

4:79 SYMEBOL 
,24,34,6 


4386 SYMEOL 
16,16,% 

4396 SYMBOL 
,24 


4466 SYMBOUL 
48, 44,6 
441% SYMEBOL 
, 16, 16, 6 
4456 SYMEUL 
4,68, 6 

4e SYMEOL 
6,26,% 

4446 SYMBOL 
b, 24, & 

445% SYMEOL 


Rte 
4,32,37 


4469 SYMEOL 
2,4,4 
4474 SYMEOL 


23321 © 


448% SYMEOUL 
26, À 
449% SYMEOL 
26,8,4 
4546 SYMEOUL 


80 


8E,60,66,64, 68,7, 6 
84,174,16,16,16, 16 
5,66,66, 66, 66,66, 
86, 66, db: 66, 66, 167 
87.66, 66,66, 90,126 
88, 66,66, 26, 24,56, 
89,68,68,68, 186, 16 
96,126,7,4,8,16,3? 
o7,6,6,56,4, 60,68, 
98,22,27,56, 6, 36, 
99,8,0,28,22,38,27 
198,4,4,28, 16,36, 7 
191,6, 


a,24,26, 6,3 


192,06,24,%6,32,56, 
193,0,9,28,%6,26,2 
14, ESS, 44,56, 54 
185,16,0,16,16,16, 
166,4,9,4,4,4,26,3 
197,32,52,22,44,48 
108,16,16,16,16,16 
199,06,6,49,84,84,68 
119,0,6,88B,36,36,7 
111,9,0,24,36,36,3 
112,6,06,44,56,56, 4 
115,0,6, 52,76,76,5 
114,6,9,44,50,32,5 
115,0,0,24,32,24,4 
116,0,16.28,16,16, 


117,0,0,26,36, 26,3 


2HRE 


JU 


GE 


6,28,6 

4519 SYMEOL 
4,8, 6 

4526 SYMEOL 
6,146,124,6 
ASES SYMEOL 
192,66, 
454% SYMEOL 
28,64 

4554 SYMBOL 
, 68,6 

4564 SYMEBOL 
66, 86,6%: "6 
4579 SYMEOL 


,® 
45684 SYMEOL 
_5,6%,6 

45964 SYMEBOL 
8,6 

484 GYMEOL 
8,8,6 

4è1e SYMEOL 


126, € 
4 SYMEOL 
56,24, 6 
ère SYMEOL 
18,6 

64% SYMEOL 
Lé,24,6 
4854 SYMEOL 
26, À 

4684 SYMEUL 
46,26, 6 
4674 SYMEOL 
4, &, 

4884 SYMBOL 
175,178,146, 
4836 SYMEOL 
LET,ITT, RTE, 
4746 SYMEOL 
256, 1664,172, 
4714 SYMBOL 
196,172, 14%, 
4726 SYMEOL 
,76,68,6 
47264 SYMEOL 
256,144,156, 
474% SYMEOL 
164,148,151, 
475% SYMEOL 
49,17,6 
476% SYMEOUL 
2,16,276,6 
4774 SYMEBOL 
21,21,226,6 
4784 SYMEOL 
64,116,64 
4796 


118,6,6,34,34,20,7 
119,9,6,136,146, 14 


120,0,0,66,107,74, 


121,6,6,18,18,14,2 
22,6,0,60,8,16,27 


45,60, 66, 66, 66, 66, 


49,8,24,46,8,8,8,8 


51,28,2,2,12,2,2,2 


52,8,24,40,7%,174, 
55,60,22,22,24,4,4 
54,74,22,22,56,%6, 


55,606,4,4,8, 16,16, 


S6,74,26,26, 74,26, 


57,24,26,26, 28,4, 4 


159,0,286,116,2:6,:6 


151,4,6,26,246, 26, 


1H, 0,215, 210,216, 


(el 


153,6,238, 127,706, 
[a 
154,6,774, 166, 166, 
re] 
155,0,228, 132,155, 
(R] 


156,9, 08, 166, 54,64 


157,0,224,144,144, 


E3 


158,06,221,148,730, 


[S 


157,6,668,68,65,44, 


+ 


168,8,112,178,96,® 
161,6,114,133,101, 


162,8, 64,64,64,64, 


ti$= CHARS (150) +CHRS (151) +C 


#KL 


2VME 


#XNE 


FQV< 


SAME 


8 (187) +CHRS (158) +CHRS (15 
CHARS CL GE) +CHRE Clé 1 + CHARS CI és 


486 SYMEOL 176,0,142,84,107,8 
4,84, 8é 


F3 +CHRS C17 1) +C 
:) +CHRS (1 
SYMEOL 156, 


», 264,168, 264, 


fs és Et 
L'été, 
48° JE 


Ve, Lété, Lété, dé, 
6, 160, 128, 08,5 


Ji l6v, 175,1 


Bt, 6, 4, L'ébét, etes, 


1, étés, L'AU, LP U, 


MECL. 
ë,6 


MECIL. 


196,6, 


LE, 6, Lét, EE, duré, 


)+CHRS# C1 
4960 SYMEOL I 
20, 120,248, 8 


4976 SYMBOUL 64,16,8,24,56, 60,2 


2, 26,6 


4986 SYMBOL S9,4,68,24,26,66, 22 
ne 


SYMEUL 51, 
Ë y 26 à 4 

» SYMEOL 195, 148, 148, 14 
196, 1 i9 YMEOL 176, 1 
162,162, 148,148, 1: î 


Lé Ê3 4 3, 28 4 HE Hé; 4 ni 


B)+CHFS (196) 
3016 RETURN 
JeSe LOLATE 9,2S:FRINT © 

Ca INE Gi Ge INF 1, és INF ZE: 1 
NE 5, és INF 4, LOL INE S,15:INE 6 
SULINE 7 ,SSsINE S,OsINE 9,1%:1 


CPANTEA 
Cr en 


#MG< 
zUH< 


NE 19,18:INE 11,24: INF 
NE 15,S12INE 14,7: INE 

FER @:BORDER @:RETURN 

5636 INE G,6:INE 1,62INE 2,@:1 
NE 3,6:INE 4,@:INE 5,6:INK 6,6 
SINE 7,O2INE 8,6: IN 9,0:INE 1 
B,GLINE 11,6:INE 12,6:INE 15,6 
SINK 14,0: INK 15,63 LO0ATE 9, 
: PEN Z: PRINT 


15,25 
, 
: 


15, 1€ 


5949 DATA 486,299, 
288, 8, x : 


Léa Téi ét, Le, LE, Le 
36, 1, 8,6 


76 ne 


119, 145,85 


LR 


Et, Dé, LA, SL, 1@1, 
5 Hs da PYPENEERS, | 


14 DATA 665,199, 16,225, D22,5S 


HUE 4 2! 
ÉCISR 


lé, Li, Lane cs 
& DAT és LE, LE, LS, 
lié, S,canmtail, 

3 Ü FE, Ï 
DE, 120,5, aubrac, 
RTE LDéiTé Se, LL, LEO ETES, LE 
"lis, li, causses, 
s210 BA 454, 11, se 


"LE, 


DE z& DAT A 506, Gé y 16, SL PES 
4,164,5,cevennes, 

G DATA SES, 1264, 16, SG, USE, SE 
OR CN. ee 
med DATA Sié, 176, 16,286, HEC, 
Hé, 184,5, 1% onnais, à 
Je DATA SES, Lead, LE HG, Het, ES 
HU, O8, 11,beauiolais,?% 
eo DATA SES, SAIS, LU, TES, 
nes, 11,charolais,: 
DA TT 14,208, 


+ 


4 Ds MOPYANs 


288,5 


22,212, 315,5 


2 PME 


UNE 


#QF< 


MAE 


81 


J296 DATA 496,158,10,%14,%19,5 
0, 160,5, forez, 2 

5296 DATA 206, 2608, 164,.520, 
Eé6,2696,11,mt d'arree, 4 
Hi60 DATA 466,286, 16, %H26, HIT, 
F, 364, 11,normandie, 4 

Ji DATA 406,564, 19,328,242,4 
8, 564, 11, p&ærche, 4 

5226 DATA 232, 332, 10, 34%, 348,4 
H96,11,picardie, 

DATA 448,260, Le, LAS, SA, 4 
6, 200, 11,artois,4 


ns ss DATA 496, IS, 16, 258,255, 4 


,, 9, flandre, 5 

DATA A4, El, 16,256, Hé 
ED, 504, 12,beauce, S 
HG DATA 486,294, 16, 
ie 


sas Les 


y Lis lorraine 
. SE, 278, LE, TF4, 74, à 
200,4,alsace, si 

He DATA ESS, 166, 16, 278, 76,2 
es nie le te 

406 DATA ESA, GB, 16,279, 20, Lé 
D B6. Se lanséteran,s 

414 DATA 297,116,160, 285,585, 2 
Et, V6, 11, armagnac, él 


4e DATA ES, 260, 16,596, 2:89, 
6, 176,8,charæente, 4 
Sie DATA 482,176, 16,296, 594,2 


Gé 168, 12,perigord, 
446 DATA 414,126, 
2e, LEO, 12, quercy, à 
5450 DATA 464,48,164,596,2398, 47 
6, 46,6, roussillon, Si 
46e DATA 466,568,1%, 
4,64,5,corbieres, 4 
5476 DATA 486,76, 16,46.5, 406, 48 
5,06,6, languedoc, 5 
3463 6 DATA 46,7%, 16, 400 
#,864,9,provence, © 
496 DATA 576,84, 16, 
Én 7 és de MAUFES, 
Joe DATA 596,721, 16, 
,,88,5,esterel, 
DATA 548,296, 16, 
4e, 64, 1i,langres, 
39626 DATA 296,264, 164, 4285, LL, 
EH, 264, 4, touraine, 


Les 64 


ep pe ges 


199,462, 46 


416,55 
417, 426,57 
EL, AE, GE 


424, 


HET 5 


HO LE PA Fer 4lé, 246, 16, 434, 4256, 4 
Le, S40, «Sologne, 5 
Sa 47e DATA Al, 248,16,429, 442, 4 


FE ea 


252, 12,berry 
do9% DATA Slé, LEE, 16,442, 
28,512, 12, champagne, Si 
5864 DATA ES55,224,16,448, 481,2 
ë4, 224, 11, vendee, 4 


me 
nt A 


447, S 


82 


# UT 


RELIEF 


5576 DATA 1,228,6,452,455,5,25 
RU dr ue 6 456, 461, 16,340 


eo ë, 466, 472, 96, à 
Des yat ls 268,6, 475 48, ue 
nds 0 6, 160, 6, 484, 489, 76 
or | 6,490, : 
1,30 17 6, 375, 6, 498, 561, 192,38 
4, 11x10 

5e DATA 1,248,8,S5602, 568,12 
88,2. : Me 1,248, 8,506, nes 
és D 60, 271,8,518 F 
2,18,K,0,185,287,8, ‘ 
209,18, K,6,1, 272,8, SE6,€ 
206, hs 0 148,257, 68, 5.%4 
76,206, 7,4, 6 

Jo96 DATA 1,168,6, Fun, EE 
668, 4H Ds ls 168, B, 541,548, ë4, 17 
5 Ds es 9 Lis 192, 5,349,56%, 32,224 
#9 d,47,261, 8,565, S64,:5:2, 


# 
y a 


184 
,12,%,0,115,206,8,565,566,96, 1 
92, 2,x,0,185,224,68,567,569, 16 
,192,12,%, 6 
És DATA 1,86,8,570,573,22,11 
2,7,x,0,1%6,86,8,574,579,176,8 
4,8,:%,9, 46,80, 8,586,587,%6,84, 
B,:,0,1,88,8,508,507,22,88,8, x 
,9,22,178,1,59%,614,64,144,1,x 
.0,120,128,1,615,625,160, 128,1 
5619 DATA 1,1,8,6%6,629,22,52, 
2,,0,1,24,8,646,641,22,16,8, x 
2, %6,1,8,642,64%,192,16,8, %x3 © 
225 12,8, 644,646, 192,40, 11,%, 
6,1,27,8,647,651,96,46,11,x,0, 
ed de red 0,8 
,48,8,655%,664,112,51,4,x,0,1, 
A 665,676,16,48,9, xs 6 


JÉ6ee DATA 26,56,8,671,67:,46,6 
ss Do es Os De 074 675, 216,48, 
Prius Das O0 y D O7 On 677 66 46,9, 
y © 
dés DATA ASS, TOUS, G7E, 705, 4 
D, 2720 00 Do 2735 0013, 706, 708,8 
M, 204,2,n,0,74,2326,23,709, 71%, 1 
29,564,2,K, 6, 64,2598,2,715,716, 
176,264,2,Kk,6, 40,266, 2,717, 718 
1192, 520,2,4, 0, 69,266,2%,719,7% 
1,192,344,2,4,0, bé OO, EH, TEE 7 
25,1894,5:60,2,x,6 
été DATA 462,258,7%,724, 724, 
HIS, 0, 08, 200,75,725,726,2% 
9, 176, ds Hs 0 00: 204,7, 727,726, 
152,2:88,2,x,6 
636 listing 
666 MODE 12 INE 6,62: 1INE. 
NE 3,4: INE 3, 6: LIST:@ 


1,243 


DT 
> VU 


# JU 


PU 


MMS 


#TNE 


#UF< 


2FQ< 


HR 


àÿ 


- Prénom ; … —_______ Totalcommande: 


(Ecrire en majuscules) 


Adresse: Port (recommandé PU): 20,00 x 


Total de mon règlement : 


Code postal: Date: 


LEE Signature : 


Ci-joint un chèque libellé à l'ordre de : VISION. Retournez k(s) bulletin(s) ou une photocopie à : 
VISION - La Haie de Pan - 35170 BRUZ. 


PTS.: 
MAX . : 


o6e8e 
(51515155) 


UIES 
3 


CP = à Le 
We pen wi! |lS - 
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L ... CR . 
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HEAD OVER HEELS 
OCEAN 


Arcade/Aventure 


Avec ce logiciel, vous devrez vous 
préparer à entrer dans un système 
solaire. L'Empire de Dentnoire est 
constitué de quatre planètes : 
Egyptus, Pénitentier, Safari et le 
Monde du Livre. L'Empereur y fait 
régner un régime plus qu'oppressif 
mais personne n'ose se rebeller et 
c'est bien ce qui inquiète une 
planète voisine nommée bien sûr 
Liberté. 

Les habitants de Liberté sont 
composés de deux parties : la tête 
et les jambes et elles peuvent 
faire des actions en étant unies ou 
séparées. Votre mission consiste à 
réunir les deux parties d'un 
habitant de Liberté qui sont 
enfermées dans le château de 
Dentnoire. Une fois cette première 
mission réalisée, il vous sera peut- 
être possible de provoquer un 
soulèvement et de mettre fin à ce 
régime diabolique !.… 

Avec Head over Heels, vous 
évoluez dans un nombre très élevé 
de pièces avec des pièges à 
profusion. Vous avancez dans un 
beau graphisme en 3D, très riche 
en détails et avec des couleurs 
superbes ; une garantie pour passer 
un bon moment. d'autant plus 
que le jeu risque fort de ne pas 
être terminé en 1 heure ! 


KRAKOUT 
Gremlin Graphics 
Arcade 


En regardant le premier écran, 
vous vous dites : encore un casse- 


briques ! Ne vous fiez pas aux 
apparences, car elles sont bien 
souvent trompeuses. C'est 
entendu ! 1 y a bien une balle et 
des briques, mais ce jeu est tout 
simplement diabolique... 

Ce qui frappe en tout premier lieu, 
c'est la multitude de couleurs 
qu'offre chaque écran. De plus, le 


QUE 


dessin formé par les briques 
change à chaque niveau. Mais ce 
n'est pas tout ! En effet, lorsque 
vous touchez certaines briques, 
elles subissent un phénomène de 
retournement et laissent alors 


LE 


30 


apparaître des lettres. || y a neuf 
possibilités différentes, mais vous 
avez, par exemple, le E qui fait 
agrandir la batte ou le X qui vous 
apporte une vie supplémentaire. 
Vous me direz que tout ceci est 
déjà fabuleux. Mais Krakout fait 
encore mieux car vous avez des 
options. En effet, au départ, la 


batte se trouve à droite, mais 
vous pouvez essayer de jouer avec 
la batte à gauche (pas si évident 
que cela !). Enfin, derniers points 
importants : Vous pouvez agir Sur 
la vitesse de la balle, mais 


également sur celle du déplacement 
de la batte. De cette manière, 
chacun peut se régaler suivant ses 
propres capacités, d'une part, et 
s'améliorer pour devenir un crack, 
d'autre part. 


RELIEF ACTION 
LORICIELS 
Aventure 


Ce nouveau logiciel veut nous 
apporter une nouvelle dimension au 
jeu d'aventure. Quelle est-elle ? 
Pensez-vous. Il s'agit tout 
simplement de relief dynamique ! 
Campons tout d'abord le décor : 
vous faisiez partie d'une équipe 
scientifique en mission sur la 
planète VEGA. Malheureusement, 
durant le vol, une mauvaise 
manipulation du laborantin a créé 
un monstre. Et, désormais, vous 
êtes le seul rescapé de l'équipe. 
Vous allez devoir déambuler dans 
tout le vaisseau (rassurez-vous, il 
n'y a que trois niveaux et une 
cinquantaine de pièces !), afin de 
rassembler pièces et indices pour 
atteindre la navette. Bien entendu, 
il est un objet que vous devez 
absolument vous procurer pour que 
le monde entier ne doute pas de 
vos propos : il s’agit du carnet de 
bord du commandant. 

Relief Action nous propose des 
écrans avec le dessin des pièces 
sous forme filaire. De plus, la vue 


e1 


en 3D peut être simplifiée en 
sélectionnant l'option relief qui fait 
apparaître des traits dédoublés 
bleus et rouges. Dans ce cas, vous 
devez utiliser la paire de lunettes 
qui est livrée avec le logiciel. Ceci 
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est un aspect intéressant du jeu, 
mais il faut également considérer 
que vous suivez un déplacement du 
décor en temps réel, ce qui vous 
permet de vraiment participer à 
l'aventure. Somme toute, un 
produit très intéressant à étudier, 
avec ou sans relief. 


SIGMA 7 
UBI SOFT 
Arcade 


Comme son nom l'indique, ce jeu 
se divise en 7 étapes, chacune 
d'elles comportant trois phases. 
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Vous êtes aux commandes d'un 
vaisseau et vous devez faire face, 
avec réflexes et vivacité, à tout ce 
qui se présente devant vous, sans 
aucune exception, car vous n'avez 
vraiment pas le temps de vous 
poser la question : ami ou 
ennemi ? 


Vous devez tout d'abord atteindre 
une usine en vous frayant un 
chemin entre les mines de défense 
aérienne (la distance à parcourir 
grandit à chaque étape...). Une fois 
arrivé “à bon port”, vous déblayez 
des sentiers sur lesquels des 
robots-mines se précipitent sur 
vous de façon inamicale. Avant de 
sortir de cette phase, retenez bien 
le motif que présentent certaines 
pastilles car il vous sera fort utile 
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lors de la phase finale. Dans 
celle-ci, vous devrez être très 
rapide pour reconstituer le dessin ; 
cette partie est vraiment très 
délicate. 

Avec ce logiciel, vous trouverez 
une bonne séance d'entraînement 
aux réflexes avec, de surcroît, un 
graphisme et un son agréables. 


SCALEXTRIC 
FIL 


Simulation 


A cette époque où la saison des 
Grands Prix a recommencé, vous 
pouvez tester votre habileté à tenir 
un volant de Formule 1 avec ce 
logiciel. 

Vous avez la possibilité de faire la 
course contre l'ordinateur ou 
contre un adversaire en chair et en 
os (malheur à lui s'il hérite des 
commandes au clavier !). 

Pour commencer, il faut 
sélectionner les conditions dans 
lesquelles vous voulez concourir : 
après le choix du circuit (vous 
avez 17 circuits de Formule 1 à 
votre disposition), il ne vous reste 
plus qu'à indiquer le nombre de 
tours que vous désirez couvrir et 
la force de votre adversaire. 

De plus, si aucun circuit ne vous 
satisfait, vous avez la possibilité 
de construire votre propre parcours 
et de le sauvegarder sur cassette 
ou disquette. Ainsi donc, les 
possibilités de courses sont 
pratiquement illimitées. 

L'écran se divise en deux parties, 
permettant ainsi de visualiser la 
course de chaque concurrent ; de 
plus, la vue totale du circuit 
montre clairement les positions 
respectives des concurrents. Avec 
Scalextric, vous avez entre les 
mains une bonne simulation, avec 
un graphisme plus que correct. 


f = A] 


E.S.A.T. SOFTWARE 
Utilitaire 


| Le lecteur de disquettes intégré à 


l'Amstrad (6128, 664) ou bien 
séparé de l'unité centrale (464) est 
bien utile à ceux qui veulent traiter 
des fichiers. Malheureusement, les 
CPC ne sont pas pourvus d'une 
fonction fort intéressante : l'accès 
direct. Imaginons que vous ayez un 
fichier de 30 Ko, la recherche 
d'une fiche se fait par le 
chargement de tout le fichier en 
mémoire. Avec l'accès direct, la 


recherche se fait sur le disque et 
seule la fiche concernée est mise 
en RAM. Cela entraîne un gain de 
place conséquent et limite la taille 
des fichiers à la capacité d'une 
face de disquette (170 Ko 
environ). 

Le programme Access Il vous 
propose une gestion de fichiers en 
accès direct par l'intermédiaire de 
 routines RSX. Les nouvelles 
instructions sont au nombre de 5 : 
IDISCOPEN : son action est 


identique à celle de ‘OPEN’ en 
BASIC Amstrad. Elle possède 

3 paramètres : le nom du fichier, 
le nombre d'enregistrements 
maximum et la longueur des 
enregistrements (de 3 à 255). En 
effet, avec l'accès direct, toutes 
les fiches doivent avoir la même 
taille. Cela permet de les retrouver 
plus facilement. 

IDISCLOSE : on le devine, ils "agit 
de la fermeture du fichier. Celle-ci 
est obligatoire, sinon il y a perte 
de données. 

IDISCWRITE : après avoir ouvert 
un fichier, il faut écrire les 


données. DISCWRITE comprend 

3 paramètres : un code d'erreur R, 
le contenu de l'enregistrement et 
le numéro de l'enregistrement. Le 
code d'erreur signale une anomalie 
survenue après l'utilisation de 
IDISCWRITE. 

IDISCREAD : il s'agit de la routine 
de lecture des données. Elle agit 


| de la même façon que IDISCWRITE | 
et possède le même nombre de : 
| paramètres. | x. 

| Dernière instruction : IDISCFIND 


permet de faire des recherches 
dans un fichier. Il suffit de définir 
quatre variables : R le code 
d'erreur, le contenu de 


| l'enregistrement, le premier numéro 


de la recherche et le dernier 
numéro. La recherche peut porter 
sur l'enregistrement ou sur le 
numéro. 

Un programme de démonstration se 
trouve sur la disquette et vous 
donnera un exemple de ce qu'il est 
possible d'obtenir avec l'accès 
direct. Le menu vous propose la 
création d'un fichier, quelques 
utilitaires : chargement de USER, 
de lecteurs, augmentation de la 
vitesse du moteur. Un éditeur de 
secteur vous permettra de modifier 
des fichiers en altérant directement 
le contenu du disque. 

2 exemples, lecture et recherche 
sur un fichier, vous permettront 
d'apprécier les capacités du 


programme. Transferts concerne 


les échanges de fichiers entre 
lecteurs. Aide et Quitter ne 
nécessitent pas d'explications 


| quant à leurs fonctions. Pour 
utiliser Access Il sur vos disques, 


l'y 


cil faudra charger le programme 


DISCMAN par MEMORY. 
&9470-1:L0AD “DISCMAN”, puis 
initialiser en tapant CALL &9470. 
Je me permets de décrire ces 
opérations puisqu'elles ne sont pas 
précisées en clair dans la notice. 
Un logiciel simple à utiliser et qui 
vous ouvre de nouveaux horizons. 


E.S.A.T. SOFTWARE 
Utilitaire 


_Lassé de corriger vos programmes 


à l'écran, vous êtes devenu 


* possesseur d'une imprimante 


flambante neuve. La sortie de 
listing ou l'impression d'un 
message sur papier ne posent pas 
de problèmes grâce à LIST #8 et 
PRINT # 8. En revanche, les 


- justifications, les tabulations, les 


différents styles de caractères 
sont beaucoup moins accessibles. 1 


- semble en effet illusoire de 


parvenir à emmagasiner les suites 
interminables de CHR$ même avec 


* le manuel comme support. 


Le logiciel “IMPRESSION” vous 
offre une série de RSX (une 
soixantaine) permettant toutes 
sortes d'acrobaties imprimables. Le 
nombre de nouvelles instructions 


- peut vous effrayer, mais le nom de 


chacune d’entre elles a été choisi 
de manière à suggérer leur 


- fonction. Ainsi IITAL provoque 


l'impression en “italique” alors que 
IAITAL supprime ce style de 
caractères. Chaque fonction 
possède son opposé signalé par le 
préfixe ‘A. Les tabulations 
horizontales et verticales ont aussi 
leur RSX précédant en cela les 
avances du papier et les sauts de 
page. 

Quelques instructions plus 
exotiques : IBIP 1 qui fait sonner 
le buzzer plusieurs fois, IVNID qui 
règle l'imprimante en mode 
unidirectionnel. 

J'ai gardé le meilleur pour la fin : 
la recopie d'écran. COPYTEXTE, 
comme vous l'avez deviné, effectue 


une recopie rapide de l'écran texte. | 


COPYGRAPHIQUE permet une 
“hard-copy” de l'écran graphique 
en deux couleurs (encre et fond). 


Cette recopie est satisfaisante en 


MODE 2 où le nombre de couleurs 
est limité. Si l'écran utilise les 

16 couleurs disponibles (MODE 0), 
il sera difficile de rendre toutes les 
nuances et les dégradés avec de 
l'encre noire. C'est pourquoi une 
fonction TRAME” a été ajoutée 
permettant de coder les couleurs 
sous forme de motifs 
géométriques. 

Sur un écran monochrome, on 
utilise ICOULEUR ou INTRAME 
pour déterminer le numéro des 
couleurs présentes. || ne reste plus 
qu'à lancer ICOPYTRAME ou 
INCOPYTRAME pour obtenir sur 
papier un dessin “coloré”. Si vous 
n'êtes intéressé que par une 
portion de l'écran, COPYPART 
imprimera le motif choisi 
auparavant. || ne reste pius qu'à 
faire une impression énorme en 
sélectionnant DOUBLECOPY. Vous 


obtiendrez une image ‘’géante” sur 


deux feuilles qu'il vous faudra 
réunir. 

Impression vous facilitera sans 
doute la vie. En revanche, il vaut 
mieux déjà avoir manipulé une 
imprimante car les explications 
fournies dans la notice ne vous 
seront pas d'un grand secours. 
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SSUE V1. mn €,O,UNE ENTREE 
€s 


IPALEC SD: UNE ENTREE,UNE SORTIE 


LORICIELS 
Aventure 


Avec cette aventure, vous êtes 
chargé d'une mission “Top secret 
qui peut se révéler vraiment très 
dangereuse. Vous apprenez à la 
radio qu'il vient de se passer un 
coup d'Etat et que le Président a 
été enlevé... 

Vous connaissez un des membres 
d'une organisation secrète qui a 
décidé de le sortir de là : il 
s'appelle Manu. Malheureusement, 
celui-ci est arrêté ! Dès lors, il ne 
vous reste plus qu'à déambuler 
dans toute la ville à la recherche 
d'indices et de contacts 


7 


intéressants, afin de récupérer le 
matériel nécessaire pour l'évasion, 
d'une part, et surtout 
l'indispensable mot de passe. 

La version de ce logiciel sur PCW 
est vraiment très réussie au niveau 
du graphisme car l'écran 
monochrome n'altère en rien 
l'intérêt du jeu. Le problème se 
situe au niveau du vocabulaire à 
utiliser ou non car, en effet, il n'y 
a aucun guide en haut de l'écran 
comme c'était le cas dans la 
version pour les CPC. De toute 
façon, il faut employer l'impératif 
et vous avez, malgré tout, une 
aide qui vous apportera (peut- 
être !) quelques indices lorsque 
vous serez par trop désespéré... 


2Ésuecs) PRINCIPALECS): S,€,0 
{sue s) PRINCIPALES): N,S,€,0 
{sue s) PRINCIPALECS): N,0 
èsuers) PRINCIPALELS ): 


LORICIELS 
Aventure 


La descente aux Enfers a été 
longue, très longue pour parvenir 
sur PCW. Mais ça y est, vous 
êtes enfin arrivé aux fins fonds 
des profondeurs et il ne vous reste 
plus qu'à effectuer votre voyage 
aux Enfers. 


Votre histoire a commencé tout 
bêtement, comme beaucoup de 
faits divers : vous avez eu un 
accident de voiture !.… Vous avez 
alors ressenti un vide immense en 
vous, puis une chaleur de plus en 
plus intense jusqu'à devenir 
insupportable. Et c'est à ce 
moment que la rencontre s'est 
effectuée : Satan était là, devant 
vous, ‘’en chair et en os” !.… 


15) PRINCIPALES): N,S 
SUEC SD PRINCIPALELS): N,S,0 
SUEL SD PRINCIPALELS): N,€,0 


SSUEL SD PRINCIPALE(S): N,S,€ 
>? 


fesur nes meme fheens mresas 
REZ ep : UNE CLE EN OR 
c RINCIPALEL S): E,O,UNE ENTREE 
15) PRINCIPALELS): N,€,0 


NCIPALEL S): S,UNE ENTREE 
AREICÈLE Le 


OBJETS PRESENTS : 


Le face à face avec Satan est le 
but de ce fantastique jeu 
Ÿ à d'aventure, mais, avant d'en arriver 


là, il vous faudra parcourir près 
d'une centaine d'endroits différents 
dans lesquels vous n'aurez pas 
moins de 24 objets à prendre et 
qui vous seront indispensables pour 
arriver au bout du voyage... 


| 


DA A0] PERSONNAGES : 
LA IN PRSSANT 
PA 


La qualité du graphisme sur PCW 
est la même que pour Top secret, 
c'est-à-dire très bonne. Ce mois-ci, 
vous avez donc la possibilité de 
vivre deux grandes aventures. 
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THE ADVANCED 
OCP ART STUDIO 
RAINBIRD 

Utilitaire 


Rainbird avait déjà frappé un grand 
coup avec The Music System. Il 
récidive en publiant un utilitaire de 
dessin réservé aux grosses 
mémoires, c’est-à-dire aux 6128 ou 
aux 464 et 664 équipés d'une 
extension 64 K. 

Après l'introduction d'un mot de 
passe choisi aléatoirement dans le 
manuel, on passe aux choses 
sérieuses. Une barre de menu 
apparaît au-dessus d'un écran 

blanc. Je vous propose, pour 
commencer, une petite ni" 
manipulation. Manœuvrez le 
curseur grâce au joystick ou aux 
touches fléchées. Le déplacement 
est parfait : pas de clignotements.. 
La juxtaposition se fait sans 
bavures. À propos de 
déplacements, la souris AM 
être gérée par le programn 
la bébette sous les doigts, on peut 
presque se sentir dans la peau 
d'un propriétaire de Mac. Pointez 


donc l'option MISC. Cliquez avec le | 


bouton de tir ou la | Lo Reco] ; 
{un menu déroulant 1 us pro pose, 
entre autres, le choix du mode 
écran. Sélectionnez le MODE ‘ns 
Puis, allez jusqu'à l'option FILE, 
faites un catalogue et choisissez le 
fichier RAYTRACE. Le dessin qui 
apparaitra alors ne vous laissera 


_ justifications, les marges et le 
| centrage, la taille en X et en Y de 


_ possible sur des fenêtres. Le choix 
de l'imprimante est possible entre 
 DMP-1, DMP-2000 ou EPSON. 

| FILE : cette option autorise toutes 


images peuvent être composées ou 
| non. La capacité maximale 
| d'images sur disques est de 56 


us 


Fit 


Litres, 

Core Lime 

BE Ramos, 
Friangies 
Fes 

Rep LES 

Filet Lier 
ERIPEES 
Flhe ERlrPeReS 


restitution des couleurs par 
tramage ; on peut agir sur les 


la recopie. Le "DUMP" est 


les manipulations habituelles des 


fichiers : effacement, catalogue, 
chargement, sauvegarde. Les 


plus aucun doute sur les are VIE 


graphiques de l'Amstrad. 
offertes. na 
PRINT : c'est une recopie d'éc 
sophistiquée. Jugez-en plutô à 
l'impression peut se faire en simple : 
ou double densité avec la 


fichiers et il est possible de 
charger 10 dessins simultanément 
en mémoire. |! est préférable de 
sauver les encres de vos œuvres 
grâce à l'option Palette, vous 
récupérerez ainsi les couleurs 
d'origines lors d'un chargement 
ultérieur. 

PALETTE : le choix des encres est 
effectué dans cette partie, avec la 
possibilité de produire des couleurs 
clignotantes. 


 PAINT : permet de sélectionner les 


“crayons” employés, la forme des 
stylos (parmi 16 possibles), la 
forme du jet de l'aérographe 

(8 options) et sa vitesse. 

Les pinceaux sont représentés par 


des motifs très colorés. On trouve | M 
un œil, une bouche, un mur de | 36 
_ briques et quelques dessins plus avec 


abstraits. Si l'une des 15 brosses 
ne vous convenait pas, il suffirait 
d'utiliser l'éditeur de formes pour 
créer un motif personnalisé. 

MISC est l'abréviation de 
miscellaneous (divers). Effacement 


de l'écran, visualisation de l'écran 


entier, différents modes 
graphiques, protection des encres 
{utile lors du changement de 
mode), ainsi que l'entrée de 
paramètres supplémentaires (type 
de souris, vitesse du curseur, 
affichage des coordonnées) sont 
disponibles dans ce menu. J'allais 
oublier la sauvegarde du 
programme sur disque. 

UNDO : est la commande miracle. 
En cas d'erreur, elle efface la 
dernière action menée. 


WINDOWS : c'est une des options 


les plus riches. Elle permet de 
définir les encres de la fenêtre, de 
choisir la taille de cette fenêtre, 
d'exclure certaines couleurs. 


| de changer une police de 
| ne ou de créer un nouveau 


isa sur ts è 


L'option MULTIPLE exécute des 
actions répétées sur les fenêtres 
telles que : rotations (1/4, 1/2, 
3/4), échange des encres, re- 
dimensionnement. Les options 


couper-copier-coller “charcutent” 


l'écran. Dernières options : 
chargement, sauvegarde de 
fenêtres et modes de recouvrement 
(OR, XOR, AND). { 
FILL : cette fonction remplit des 
surfaces fermées ou des couleurs 
d'une teinte ou d'un motif choisi à 


| l'avance. Elle possède quelques 


variables telles que le remplissage 


| total ou par trame. Ici encore, on 


trouve un éditeur permettant la 
création des motifs. 


ou sans le (en mod 


| TEXT : c'est ici que l'on définit le 


format des lettres à inscrire sur 
l'écran. Il est possible d'aller 


jusqu'à trois fois la taille normale, | 
dir 


l'écrire dans toutes le 


SHAPES : les Le suivantes 
sont présentes : ligne continue, 
rectangles, triangles, rayons, 
cercles, ellipses, le tout avec 
option élastique où non. 

Je pourrais continuer ainsi j la ste 


des options pendant plusieurs u 
pages. OCP est un des logiciels 


graphiques les plus parfectionnés 
que je connaisse. Sa facilité 
d'utilisation et sa puissance vous 
permettront, sans nul doute, 
d'atteindre des sommets dans l'art 
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42 TECHNOLOGIE-RECHERCHE & APPLICATIONS NOUVELLES 


LA ZI Les Fourches - Les Espaluns - Avenue Lavoisier 
UE 83160 LA VALETTE-DU-VAR - Tél. 94.21.19.68 


100% Langage Machine 
Fenêtres & Menus Déroulants ex ŒuIX qua V 
Un Editeur secteur unique qui vous 


Hx ù TEU permet de visualiser et de modifier 
fs Jentin | Piste : : L ED le contenu de toute disquette, 


un 
Editeur -+Copieur+Exploreur Pan La” ao. de de A | 
veu 


14 
1-4 
> 
15° 


qu'elle soit protégée ou non. 


= 
je 1 


RARES) 
OR 


Quatre modes d'édition combinant Ascii, hexa, décimal, octal, binaire. 


A het dr 
25a2258 


Des capacités exceptionnelles que vous pouvez exploiter immédiatement : 
e Désassemblage direct des programmes en Langage Machine 
e Listage automatique des programmes Basic 
e Les outils de bureau : ciseaux, colle, calculatrice mathématique 
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Toutes les possibilités à La portée du débutant comme de l'expert : 
(: Récupérer une disquette endomagée ou un programme effacé 


ei 
= 


' SRB: 
* Se 


e Explorer un directory, le reparer, Le modifier 
e Localiser des fichiers, Les cacher, les visualiser, Les modifier 


Enfin la copie de sauvegarde pour QUES vos 
COPIEU disquettes (et cassettes) protégées où pas. 
LE Comme l'Editeur, il reconnait 99 pistes, toutes 


les densites d'écriture, les pistes déformatées, les 
secteurs non standard, effacés ou de taille anormale. 


Des performances inédites à votre service : 
e Réparation automatique des secteurs endomagés 
e Gestion automatique des extensions mémoire 


e Une fonction catalogue qui permet de copier des 
fichiers séparément sur cassette ou disquette. 


Voyage au centre de La disquette... 
OREUR L'Exploreur de Discologyÿy fournit toutes 

9 EXPL Les informations sur la disquette : 
L Formatage, densité d'écriture, caractéristiques des 


secteurs, secteurs "plantés", plan d'occcupation des 
fichiers sur la disquette. 


Un outil passionnant pour découvrir tous Les 
secrets de vos disquettes et du controleur disque. 


Pour tous les "'cracks" de l'Amstrad et ceux qui 
veulent le devenir. 


Discology est disponible sur disquette pour Amstrad CPC chez tous les très bons revendeurs. Vous pouvez aussi Le commander 
directement sans frais de port supplémentaires à : MERIDIEN Informatique - 11, rue Léandri - 83100 Toulon 
e Master Save est toujours disponible au prix de 190 F. IL reprend les caractéristiques du Copieur de Disquette de Discology 


e Si vous désirez recevoir Discology et que vous possédez déja Master Save, vous ne payez que la différence. 


O JE DESIRE RECEVOIR DISCOLOGY AU PRIX DE 350 F 
OQ JE DESIRE RECEVOIR MASTER SAVE AU PRIX DE 190 F 
O JE POSSEDE DEJA MASTER SAVE ET JE DESIRE RECEVOIR DISCOLOGY. JE JOINS MA DISQUETTE MASTER SAVE ET JE NE PAYE QUE 160 F 


MON REGLEMENT : © CHEQUE QUE JE JOINS (LE PORT EST GRATUIT) © CONTRE REMBOURSEMENT (J'AJOUTE 25 F DE FRAIS DE PORT) 


NOM : PRENOM : 
ADRESSE : 
CODE POSTAL : VILLE : TEL (facultatif) : 


A retourner à : MERIDIEN Informatique - 11, rue Léandri - 83100 Toulon 


DES COMPATIBLES PARTOUT 

De nombreux constructeurs asiatiques et même français 
proposent des compatibles PC à des prix très accessibles 

Les Jasmins Turbo par exemple se vendent aussi en 
grande surface comme des produits de consommation 
courante 

Toutefois. la grande variété des prix et configurations. 
ainsi que les différents niveaux de compatibilité posent à 
l'acheteur non averti un problème de choix 

Voici quelques critères qui vous permettront de définir 
le type de matériel le mieux adapté à vos besoins 


COMPATIBILITE SOFT 

Tout logiciel écrit pour le standant IBM PC. tant qu il n'est 
pas protégé pour l'exclusivité d'une marque d ordinateur 
donnée, doit tourner complètement sans aucun problème 
avec la version du système d'exploitation correspondant 
comme MS DOS, DOS PLUS. PROLOC. etc 


COMPATIBILITE HARD 

L'intérêt du PC est d'être un système ouvert Il doit être 
possible de rajouter n'importe quelle carte électronique con- 
çue pour le standard : cartes graphiques couleur haute réso- 
lution EGA. contrôleurs de disque dur, contrôleur d'unité de 
sauvegarde, carte d'entrées/sorties. carte de communica- 
tion, où encore. une carte d'analyseur logique pourquoi pas 

Encore faut-1 vérifier que l'on dispose de la place néces 
saire pour installer ces cartes 

Les écarts entre les connecteurs d'extention sont norma- 
lisés mais certaines cartes trop épaisses prennent la place 
de deux connecteurs. Il sera bon de s assurer qu 1l est pos- 
sible de disposer d'au moins cinq connecteurs libres. Pré- 
voir par carte un emplacement de 34x12 cm pour une épais- 
seur de 2 cm 


TURBO 

La vitesse de l'IBM PC est de 4.77 MHz. Il existe mainte- 
nant des PC appelés « TURBO », qui tournent à 8 MHz Ces 
derniers permettent d'obtenir des performances d'environ 
1,5 fois supérieur en vitesse à l'IBM PC Afin de conserver 
une réelle compatibilité. vérifiez que votre Turbo fonctionne 
également en 4,77 MHz. Ces deux vitesses doivent être com- 
mutables au clavier 


LES COMPATIBLES PC LES PLUS VENDUS 
LES JASMINS TURBO HQ TELEMATIQUES 


L'ASSURANCE D! DES GRANDES MARQUES J 
w CGEE ALSTHOM IE. 


D TRAN - 


ouvrés. 


HQ pour Haute Qualité. Chaque modèle est équipé 
d'office d'une carte turbo double vitesse 8 MHz et 4,77 
MHz commutable au clavier, indispensable pour une vraie 


compatibilité. De la carte CGA : 16 couleurs/graphique 
avec une sortie vidéo composite couleur, une sortie vidéo 
N et B, une sortie RVBI, une interface crayon optique. 
La carte multi 1/0 comprend deux ports série dont un 
équipé. Une interface imprimante parallèle Centronic, une 
entrée manette de jeu, une horloge/calendrier permanent 
sauvegardée par batterie, un contrôleur pour deux lecteurs 
de disquette. 


Clavier AZERTY aux normes IBM avec indicateurs 
lumineux. 


Souris trois touches JASMIN Mouse de haute pré- 
cision et faible course. 


Boîtier métallique « FLIP TOP ». Alimentation 150 W, 
ventilée, intégrée dans l'unité centrale, ce qui permet une 
évolution sans soucis de la configuration du système. 


Carte-mère équipée d'office de 640 K RAM, du 
microprocesseur 8088-2, d'un emplacement prévu pour 
le coprocesseur arithmétique 8087 et de 8 ports d'exten- 
sion à connecteurs longs. 


A compter du 1°" . 1987 TRAN vous offre une garantie éten- L 
due d’un an dont la maintenance sera assurée par le réseau natio- e 

nal des laboratoires CGEE-ALSTHOM. Vous assurant le dépan- e ? 
nage de votre JASMIN TURBO dans un délai de trois jours : , 


COMMENT CHOISIR UN COMPATIBLE PC 


CARTE MERE : 

La carte mère est le cœur 
ia compiexité des logi 
ticuher des logels intégré 
très souvent insuffisants Si 
optez dès le départ pour la capac té 
Une extention ultérieure serait plu 


du système De plus en plus 


ous je permet 
soit 540 K 


I est bon de savoir qu 1l est poss d augmenter de 
façon notable la vitesse de calcul de votre o par adjonc 
ton d'un coprocesseur arithmétique 8087 Aussi si vous pen- 
sez en avoir besoin. choisissez une carte mère possédant un 
emplacement prévu pour ce circuit 


ALIMENTATION : 

Le point faible de ia plupart des micros réside dans] ai. 
mentation L'alimentation classique d'un PC est d'au moins 
135 W_ Si vous souhaitez utiliser votre PC plus d'une heure 
par Jour. assurez-vous de l efficacité de sa ventilation. de 
même que de la possibilité d'augmenter la puissance de | ali 
mentation par simple échange 

Une alimentation de 150 W sera préférable surtout s: 
vous envisagez le rajout de cartes d'extention. ou encore | ut 
l:sation d'un disque dur 


BOITIER 

Un micro est sensible aux perturbations électriques Si 
vous voulez éviter qu'il se « plante » (orages. néons) portez 
votre choix sur un boîtier métallique permettant de préfé- 
rence un accès aisé à vos cartes électroniques Les boîtiers 
appelé « Fhp-Top » sont encore le plus pratiques Ils permet 
tent ure ouverture rapide par simple pression. à la façon d ur 
capot d automobile 


MONITEUR 

L'intérêt et le succès du PC sont dus à sa conception très 
évolutive. Vous débuterez peut-être dans la micro par des 
Jeux, mais les possibilités de votre PC peuvent rapidement 
vous conduire dans le domaine des applications profession- 
relles, tel le dessin assisté par ordinateur Chaque applica 
tion nécessite une définition d'écran appropriée Assurez 
vous qu'1l vous est possible de changer d écran facilement 
en fonction de vos besoins 


LS 


Chaque JASMIN Türbo est accompagné : 


e Du système d'exploitation DOS PLUS, de DIGITAL 
RESEARCH INC., compatible avec le système MS.DOS 
2-11 et CP/M 86 qui rend possible les transferts de fichiers 
entre les deux standards. 

+ Du système d'exploitation d'environnement graphi- 
que G.E.M. de DRI qui permet au JASMIN Turbo d'utili- 
ser toute application écrite sous GEM disponible sur le 
marché. Par exemple le GEM-DESKTOP (pour bureaux) 
permet d'utiliser le JASMIN avec des icônes comme un 
MACINTOSH. Convivialité oblige ! 

+ Du langage structuré le plus vendu au monde : 
TURBO/PASCAL de BORLAND avec son manuel 

° Du logiciel MASTER MIN qui transforme le JAS- 

MIN connecté à un Minitel en serveur VIDEOTEX 
monovoie. 
Tous les logiciels ludiques et professionnels « tour- 
nent » sur les JASMINS Turbo HQ. Nous n'avons 
pas encore trouvé de logiciel qui ne marche pas avec 
les JASMINS. 

Le modèle HQ-2 est équipé de deux lecteurs 51/4. 

Le modèle HQ-20 est équipé d'un lecteur 51/4 et 
d'un disque dur 20 MB rapide (65 m/s) : 


IBM PC/XT sont des Marques Déposées de International Business Machine Corporation. DOS PLUS-GEM sont des Marques Déposées de DIGITAL 
RESEARCH INCORPORATION. TURBO-PASCAL est une Marque Déposée de BORLAND INTERNATIONAL. JASMIN-TURBO est une Marque 


Déposée de T.R.A.N.. MASTER MIN est un logiciel de MINI PUCE. La Société T.R.A.N. se réserve le droit de modifier toute spécification sans préavis. 


CLAVIER : 


PC n est pas dans le clavier ! Un clavier à 
é. vous sera peut-être utile par la suite Vous 
chan iger de clavier à votre convenance Pour 
à 1} vous faut un clavier aux normes de connection IBM 


À 


LA SOURIS 


ll existe de nombreuses qualités de souris dont les prix 
varient de 200 F à 2000 F 


La qualité dune souris. réside dans sa sensibilité. sa 
résolution. sa course La précision doit être bonne sur une 
petite course Il doit être possible de balayer ! écran sans 
avoir à balayer tout le bureau 


Attention, certains logiciels loi de trois 


touches sur la souris 


nécessitent | emp 


DISQUE DUR 
iDreux fiCHiers OÙ : 


Lorsque vous travailez avec je 10m 
.ongs fichiers un disaue dur vous est nécessaire Tous * 
.cgiciels et fichiers seront stockés en permanence sur ie ais 
que aur qui peut suivant le modèje contenir 10, 20 ou 40 r1. 
110$ 9 2ctets Le temps 2 accès moy : à une Informatior. 
varie de 30m. s a #6: s On dit À un disque dur qu'est 
rapide iorstue sor. er.ps d accés moven est inférieur à © 


Un PC non évolutif ne sera jamais un PC 
Michel ROY 


vente JAS- 
La se R5O poire désormais 


dans P. Compatible 


TARIF AU er MARS 1987 


Sans moniteur Avec moniteur Avec moniteur 
mono 12" couleur 14” 


HOQ-2 6.483,97 HT 7.242,83 HT 8.760,54 HT 
HQ-20 10.615,51 HT 11.374,36 HT 12.892,07 HT 
Imprimante qualité courrier CITIZEN 120D, | 
120-Cps;:80; col: 24um un mans veut 2.099,49 HT 
Imprimante qualité courrier plate 

type BROTHER ou CENTRONIC 180 cps, 

136 col. grand chariot.................. 4.207,42 HT 
JASMIN Mouse, souris trois touches 

haute précisiOn, .., 1444 ais sudeueeiauuex 674,54 HT 


Toutes ces imprimantes sont compatibles IBM. 


Le tarif ventes diverses est envoyé avec la 
documentation. 


Des logiciels professionnels pour comptabilité, 
facturation, gestion sont disponibles. Téléphoner à 
T.R.A.N. pour renseignements complémentaires. 


Je désire recevoir une documentation 
complète, tarifs, sur la gamme JASMIN 
TURBO HQ (Joindre 1 timbre à 2,70 F) 


Code postal................ Télé obersen os 
Renvoyez ce coupon à : 


TRAN INFORMATIQUE Avenue Lavoisier 
ZI. Les Fourches, Les Espaluns 
83160 LA VALETTE DU VAR-TéI. 94.21.19.68 £ 


TRUCS ET ASTUCES 


POST SCRIPTUM 


Daniel VANDENBROUCKE, l'auteur de 
PARTICIP CPC HS n° 3, nous fait part 
d'une petite modification à apporter à 
son programme pour qu'il fonctionne 
parfaitement. 

Réécrire la ligne 480 comme suit : 


480 DATA ‘ Les chiots que j'ai (caressé) 
étaient mignons.'", 
caressés,oui,1,chiots,oui,oui 


Ce qui revient à dire que les ‘’non,non' 
de la version précédente deviennent des 
‘’oui,oui'”. 


TRONCATURES 


Philippe LHOSTE, du CTISTAT de 
SATORY, fait un sort à certaines bogues. 
De même, explique-t-il, que 1/3 n'a pas 
de représentation limitée en décimales, 
certains nombres ont un nombre de déci- 
males indéfini en binaire, d'où troncatu- 
res et. erreur. Ce défaut est inévitable 
et commun à toutes les machines. 


FORMULES 


Généreux, Philippe LHOSTE vous offre, 
d'abord une simplification des fonctions 
ARCSIN(x) et ARCCOS{x) (les plus cour- 
tes sont les meilleures), que nous vous 
avions proposées dans un précédent 
numéro, ensuite les formules hyperbo- 
liques. 


ARCSIN(x) = ATN(x/SOR(1-x* x)) 
ARCCOS{x) = pi/2-ARCSIN(x) 
SINH(x) = (EXP(x)-EXP(-x))/2 
COSH(x) = (EXP(x) +EXP(-x))/2 
TANH(xX) = (1-EXP(-2*x)}/(1 +EXP 
(-2*x)) 
ARGSINH(x) = LOG(x +SOR(x*x +1)) 
ARGCOSH(x) = LOG(x +SQR(x*x-1)) 
ARGTANH(xX) = LOG((1 +x)/(1-x))/2 


Et on est prié de ne pas se mélanger les 
pinceaux dans les parenthèses ! 


FORMATEUR, EXPLOITEUR ! 


Non, il ne s’agit pas du nouveau slogan 
entendu entre Bastille et Nation, mais 
tout simplement de deux petites routines 
qui vous feront gagner de la place sur 
vos disquettes. De 178 Ko, vous passe- 
rez, d'un seul coup d'un seul (enfin pres- 
que), à 191 Ko, soit un gain de 13 Ko. 
Voyons d'abord le formateur qui récu- 
père les pistes 40 et 41. 


10 FOR N=1 TO 51 

20 READ A$:POKE X,VAL(''&''+A$) 

30 NEXT N 

40 CALL &O0F80 

50 DATA 6,9,3E,C1,21,b3,F,23,23,77, 
23,36 

40 DATA 2,23,3C,10,F6,AF,F5,21,b3, 
F,E5 

50 DATA 11,4,0,6,9,77,19,10,FC,57, 
1E,0 


60 DATA E1,E,C1,DF,b0,F,F1,3C,FE, 
2A,20 
70 DATA E3,C7,42,C0,07 


Ne soyez pas surpris si le programme fait 
un RESET après formatage (DATA) 
d'une face. Voyons maintenant l'exploi- 
teur qui doit être, impérativement, exé- 
cuté avant toute opération sur le disque. 
Laurent KUTIL, qui nous envoie ce truc, 
recommande de l'incorporer à vos 
LOADERS. 


10 OPENOUT"'X"" 

20 POKE &A8A8,&FF 

30 POKE &A895,PEEK(&A895) + 13 
40 CLOSEOUT 


Pour la vérification, exécutez l'exploiteur 
et faites CAT. 


INTERVALLES 


31 décembre 1999 - 10 juin 1987. Oui, 
c'est une soustraction ! Sauriez-vous, 
rapidement et sans trop vous casser la 
tête, calculer le nombre de jours qui nous 
séparent de l’an 2000 ? Gérard BUGEL 
de BRIVE, lui, entre les données sur son 
6128 et obtient, instantanément, le 
nombre exact. De plus, vous saurez, 
avec le même programme, quel jour sera 
le 1er janvier 2000. Le programme est 
concentré, mais bonjour les fonctions 
logiques ! Soufflez dans l’alcootest avant 
de vous mettre au clavier. Un dérapage 
est si vite arrivé | 


10 ‘fnj% = n° du jour, fnm% = n° du 
mois 

20 ‘fÎna% = n° de l'année 

30 ‘ncj = code du jour 

40 ‘fnjour$ = jour de la semaine 

50 DEF FNj% = VALILEFTS$ (dates ,2)) 

60 DEF FNm% = VAL(MIDS$ (dates, 


4,2)) 

70 DEF FNa% = VAL(RIGHTS$ 
(date$ ,4)) 

80 DEF FNjour$ =jour$ (FNcj + (FIX 
(-FNcij/7)*7)) 


90 DEF FNcj=365*FNa% + FNj% + 
31 *(FNMm%-1) + (ABS(FNm% 
< 3)*(FIX((FNa%-1)/4-FIX(0.75 * 
({FIX((FNA%-1)/100) + 1)))) + (ABS 
(FNm% > 2)* 
(-FIX((FNm% * 0.4) + 2.3) +FIX 
(FNa%/4)-FIX(0.75*(FIX(FNa%/ 
100) + 1)))) 

100 RESTORE 120 

110 FOR X=0 TO 6:READ jour$ (x): 


LES NUMEROS HORS 
SERIE DE CPC 


GRATUITS 


pour les abonnés 


Bon de commande page 8 


NEXT 

120 DATA SAMEDI,DIMANCHE,LUNDI, 
MARDI,MERCREDI,JEUDI, 
VENDREDI 


Bel algorithme, non ? Pour la saisie de la 
date, le format est jj-mm-aaaa. 


COMPATIBILITE 


Très intéressé par ‘Les mêmes program- 
mes pour tous les CPC’ de Daniel Le 
Barbier, CPC n° 21 (avril 87), Robert 
CABANE de PARIS 11 expose ses trucs 
pour obtenir GRAPHICS PAPER et GRA- 
PHICS PEN. 

Pour PEN, faire PLOT319,319,couleur. 
Cela fixe la couleur mais, pour l'affi- 
chage, il faut, au préalable, placer le cur- 
seur graphique au bon endroit. Pour 
PAPER, faire ORIGINO,0O,0,0,0,0 puis 
CLG 1, ce qui a pour effet d'afficher un 
petit trait en bas à gauche sur l'écran et 
met l'encre graphique au n° 1. Mais 
mieux vaut, sur 464, faire POKE 
&B338,PEN et POKE &B339,PAPER. 
Dans ce cas, on travaille sur un masque. 
Si l'on utilise des valeurs autres que O, 
1, 240 ou 255, on obtient des tracés en 
pointillés simulant MASK. 

Pour le PASCAL HI-SOFT (concurrent de 
TURBO et très rapide en graphisme), il 
est possible d'appeler les routines systè- 
mes à l'aide de ce type de syntaxe : 
ra:=c;rhl:=n ; user(#.…...) ; …… 


PHLYCTENES 


Pour les inconditionnels d'ULTIMATE 
FIGHT (CPC n° 17), dont les doigts 
seraient sujets à des échauffements pro- 
noncés et dont le clavier se refuse à subir 
les derniers outrages, Michaël HOFFERT, 
de THIONVILLE, propose les modifica- 
tions suivantes : 


280 IF JOY(0)= 1 etc. 
290 IF JOY(1)=1 … 
300 IF JOY(0)=2 … 
310 IF JOY(1)=2 … 
320 IF JOY(0)=8 … 
330 IF JOY(1)=4 … 


340 IF JOY(0)< >8 … 


350 IF JOY(1)< >4 … 
370 IF JOY(0)=8 … 
380 IF JOY(1)=4 … 


Désormais, c'est le joystick qui subira 
vos assauts |! 


APPEL A BIDOUILLE 


Qui serait capable de réaliser un montage 
pour la conservation de la date du 
CP/M ? 


Pierre TACONNET 
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INITIATION A 


Nous allons voir ce mois-ci, dans la suite 
de notre étude des fonctions du BDOS 
de CP/M, les fonctions de lecture et écri- 
ture en mode séquentiel, plus quelques 
fonctions diverses. 


FIXATION DE L'ADRESSE 
DES TRANSFERTS DISQUE 


Afin d'expliciter le fonctionnement des 
fonctions de lecture et d'écriture, il nous 
faut parler de la fonction 26 qui permet 
de fixer l'adresse des transferts disque. 


Si vous avez l'intention de CREER 
ou si vous avez déjà créé 


VOTRE BOUTIQUE INFORMATIQUE 


rejoignez nous avec la franchise 
SON VIDEO 8000 et devenez un 
distributeur POINT MICRO pour 
MOINS DE 20 000 Frs !1! 


DISTRIBUTEUR AGREE AMSTRAD, COMMODORE 
ATARI,ORIC et COMPATIBLES PC . 


RENSEIGNEMENTS 
Tél. 56.91.15.81 
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En effet, lors d'une lecture séquentielle 
par exemple, CP/M va lire un secteur 
logique de 128 octets et le contenu de 
ce secteur sera mouvementé à l'adresse 
courante des transferts disque. Lors du 
démarrage de CP/M, cette adresse vaut 
80H, mais la fonction 26 permet de fixer 
cette adresse de transfert où vous le 
désirez, c'est-à-dire le plus souvent dans 
une zone réservée à cet effet dans votre 
programme. 

Si cela est nécessaire, cette adresse peut 
être modifiée avant chaque lecture, pour 
charger un fichier en mémoire, par exem- 
ple, ou pour changer de zone de trans- 
fert lorsque l'on passe d'un fichier à un 
autre dans un programme qui travaille sur 
plusieurs fichiers. 

Bien sûr, dès que votre programme se 
termine, CP/M réinitialise cette adresse 
à 80H. 

En entrée: C=26 DE= contient 
l'adresse des transferts disque à fixer. 
En sortie : pas de code retour. 


LECTURE SEQUENTIELLE 
D'UN FICHIER 


Cette fonction permet la lecture en 
séquentiel d'un fichier préalablement 
ouvert par la fonction 15. Rappelons 
que, pour CP/M, un fichier est un ensem- 
ble d'enregistrements logiques de 
128 octets (un ‘‘secteur'" CP/M). 

Donc, après la fonction 15 d'ouverture, 
le fichier est ouvert et le pointeur dans 
le fichier est fixé sur le premier enregis- 


trement à lire. 

Chaque appel successif à la fonction 20 
va donc lire 128 octets du fichier et les 
mouvementer à l'adresse fixée par la 
fonction 26 et déplacer le pointeur d'un 
enregistrement. 

En entrée: C=20 DE= contient 
l'adresse d'un FCB d'un fichier ouvert. 
En sortie : À contient O si la lecture s'est 
effectuée sans erreur. 

En CP/M 2.2 une valeur différente de O 
signale que l'on a atteint la fin du fichier. 
En CP/M Plus les différentes valeurs pos- 
sibles de A sont : 

— O1 : fin de fichier. 

— 09 : FCB invalide. 

— OA : disquette a été changée. 

— FF: erreur physique, code dans H. 


ECRITURE SEQUENTIELLE 
D'UN FICHIER 


Cette fonction permet d'effectuer des 
écritures séquentielles dans un fichier 
préalablement ouvert, soit par la fonction 
15, soit par la fonction 22. 

Après l'ouverture, le pointeur dans le 
fichier est fixé sur le premier enregistre- 
ment existant (fonction 15) ou à créer 
(fonction 22). 

Chaque appel successif à la fonction 21 
va donc prendre les 128 octets se trou- 
vant à l'adresse des transferts disque et 
les écrire dans le fichier concerné. Si le 
fichier était un fichier non vide et exis- 
tant déjà, les écritures successives écra- 
sent les anciennes données. Si on 


dépasse la fin du fichier tel qu'il existait 
à l'ouverture, celui-ci augmente en taille 
et la nouvelle fin de fichier est après le 
dernier enregistrement écrit. 

En entrée :C=21 DE= contient 
l'adresse du FCB d'un fichier ouvert. 
En sortie : À contient le code retour, O 
si pas d'erreur et non nul dans le cas 
contraire. 

Sous CP/M Plus les codes possibles 
sont : 

— 01 : plus de place dans le catalogue 
(en cas de création d'une nouvelle exten- 
sion du fichier). 

— 02 : plus de place sur le disque pour 
les données. 

— 09 : FCB invalide. 

— OA : disquette changée. 

— FF : erreur physique (code dans H). 


CREATION D'UN NOUVEAU FICHIER 


Lorsque nous avons décrit la 
fonction 15, nous avons précisé qu'il 
s'agissait de l'ouverture d'un fichier déjà 
existant. La fonction 22 permet de créer 
un nouveau fichier. C'est-à-dire qu'elle 
est identique à la fonction 15 sauf qu'il 
faut que le fichier spécifié soit inexistant 
dans le catalogue et que cette fonction 
crée le premier poste catalogue pour ce 
fichier. 


En entrée : C-22 DE= adresse d'un 
FCB correctement initialisé. 

En sortie : À contient une valeur de O à 
3 si l'opération s'est effectuée correcte- 


INITIATION A CPIM 


ment et OFFH dans le cas contraire. 
Sous CP/M Plus le registre H contient le 
code erreur (voir fonction 15). 

La figure 1 vous donne un exemple com- 
plet d'utilisation de ces fonctions. 

Ce programme recopie un fichier dans un 
autre, quelqu'en soit le contenu, texte ou 
binaire, car la copie se fait par ‘‘sec- 
teurs’ CP/M de 128 octets. 


CHANGEMENT DU NOM D'UN FICHIER 


Cette fonction permet de changer le nom 
d'un fichier existant par un autre nom 
qui, lui, ne doit pas correspondre à un 
fichier déjà présent dans le catalogue. La 
zone pointée par DE contient dans ses 
16 premiers octets, le nom du fichier à 
renommer, dans le même format que 
pour un FCB. 

Les 16 octets suivants contiennent le 
nouveau nom du fichier également dans 
le format d'un nom de fichier de FCB, 
mais avec le premier octet toujours à 
zéro. 

En entrée : C=23 DE= adresse d'une 
zone contenant l’ancien nom et le nou- 
veau nom en format FCB. 

En sortie : À contient un code retour 
équivalent à une ouverture de fichier, 
c'est-à-dire de O à 3 en cas de succès 
et OFFH en cas d'erreur. 

Sous CP/M Plus en cas d'erreur, le regis- 
tre H contient le code de l'erreur. 

La figure 2 vous donne un exemple d'uti- 
lisation de cette fonction. 


LECTURE DU VECTEUR D'ETAT 
DES DISQUES 


Cette fonction permet de connaître les 
disques qui sont en ligne. Un disque ‘'en 
ligne'’ est un disque qui a été accédé. 
Ainsi, dans un système à 2 lecteurs de 
disquette, si vous n'avez pas effectué 
d'accès au lecteur B :, celui-ci n’est pas 
en ligne. Cette fonction ne permet donc 
pas de connaître le nombre de lecteurs 
maxi possibles dans un système. 

En entrée : C =24 

En sortie : le registre HL contient le vec- 
teur des disques actifs. 

Le bit O de L correspond au disque A:, 
le bit 1 au disque B:... jusqu'au bit 7 de 
H qui correspond au disque P:. 

Si le bit est à O, le disque n'est pas en 
ligne. 

Si le bit est à 1, le disque est en ligne. 


LECTURE DU NUMERO 
DU DISQUE COURANT 


Cette fonction permet de connaître quel 
est le disque courant, c'est-à-dire celui 
sur lequel on effectue les opérations dis- 
que lorsqu'aucun disque n'est spécifié 
dans les noms de fichiers. 

En entrée : C=25 

En sortie : À contient le numéro du dis- 
que courant. (A: =0 B:=1..) 

Le mois prochain, nous continuerons 
avec quelques fonctions diverses, mais 
surtout avec les lectures et écritures en 
accès RANDOM (accès relatif). 


———— 


5; Ce programme lit un 

DOS eau 5 

CONQUT eau 2 

PRINTS qu 9 

OPEN eau 15 

CLOSE equ 16 

CREATE eau Be 

DELETE #qu 19 

READ equ £ 

WRITE =quU zi 

SETDMA eau £'E 

CR eau GDH 

LF = qu GAH 

5 Debut du programme 
ixi d, MGGDEE 
mvi Cr PRINTS 
“call BDOS 

5 Ouverture du fichier à 
mv i z1 OPEN 


fichier et 


le recopie dans un 


Appel du 


PT 


Affiche un 


ecriture 


Retour chariot, 
À la ligne. 


sn sn 


Affiche message de 


PT 


Copier. 


Quverture 


PT] 


autre. 


EDOS de CP/M, 


caractere, 


debut. 


du fichier 


sequentieile, 
Fixe adresse des transferts disque, 


L 

5 Affichage d'un message. 

: Ouverture d'un fichier ekigstant. 
5 Fermeture d'un fichier ouvert. 

3 Creation d'un fichier, 

5 Suppression fichier ekistant. 

3 Lecture sequentielle. 

; 

5 
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Ki ds: FCEBIN 5 a recopier, 
call EDOS 
ENT a 


jz Evreuri 3 Fichier non trouve, 

mv i C3 DELETE : Suppression du fichier 

[Xi ds FCRBOUT ; en Sortie si ekiste deja. 

call EDOS 

mv i C3 CREATÉE 3 Et création d'un nouveau 

LXi dr FCBOUT ; fichier en sortie 

cali BDOS 

inr a 

jE Erreurs 5 Erreur de création fichier en sartie, 

Pxi. dr EUFFER 5 adresse du tampon POUT 1e operations disaue, 


my i 1 SETDMA 
call EDOS 


5 Boucle de lecture du fichier en entree 
Lits my i z, READ 


[Ki di FCBIN 
call BDOS 


Lecture d'un enregistrement en entre, 


ora E 

inz FindDeFichier 5 Fin de fichier ou erreur grave, 

mv i z: WRITE 3 Ecriture d'un enregistrement en gurtie 

1xi dr FCEOUT 

call EDOS 

ra a 

Jin ErreurEcriture 3 Erreur a l'ecriture, 

mv i ss CONOUT 5 Affiche un point 

mv i CES ; Pour Signaler que 

call EDOS ; le programmes travaille. 

j mp Lit 3 Sinon réboucle sur lecture, 
FinldeFichiert 

cpi Î 5 Fin de Fichier? 

ie Erreuyré 5 NON affiche l'erreur. 
Fermetures: 

Ki d: FCBIN 3 Fermeture du fichier en entree, 

mv i cs CLOSE 

call BDOS 

Ki d: FCBOUT ; Ferpeture du fichier en sortie. 

mv i 3 CLOSE 

call BDOS 

inr a 

ii? Erreur 5 Si erreur à la fermeture, 

imp Fin 
Evrenris 1xi ds MSGERRI 3 Messages d'erreur numerm 1 
Évyeurs mvi Cs PRINTS 5 Affiche message 

call EDOS ; adresse dans DE. 

imp Fin ; et termine. 
Erreurs Lx d, MSGERRE 1 Message numero € 

immo Erreur 


EvreurEsrituses 
Ii dr MSGERRTE 5 Message numero Z 
Msaithermes 
mv i is PRINTS 
call BDQS 


pe 
+ 
+ 
A 
ed 
1] 


+ ME Fermetures 1 et ferme les fichiers, 
UV V és Ka d: MSGERRE 5 Message numero à 


jme MsgEtPerme 


5 Fin du programme 


INITIATION A CPM 


Fins twi dis MSGEIN 5 Affiche message de Fin 
my i Cr PRINTS 
call EDOS 
my i Er À 


call KHDOS 


FISGERRAIE db CR LF, Erreur ouverture fichier en entr 


ce, $° 


FSGERRE CR LFP, Erreur creation ficher en sortie, &° 
MSGERRTE db CRILF, Erreur ecriture sur fichier en Sortie, &' 
MSGERR4AS db CR LF, Erreur lecture sur fichier en entres, &' 
MSGDERS db CR; LF, LFP, "Debut du programme’; CR; 

db CR LFP: LFP, Fin du programme’, CR, LF 

db La] 3 FCB du fichier en entres. 

db see, 5 

db 7 

db ” @ 

ds 26-C$8-FCRIN) 
FCEOUTS db A 5 FCR du fichier en surtie. 

ab ESSAI 7 

db ? SAV? 

db a 


ds ZE-C$-FCBOUT ) 


db Buffer= 
BUFFER: ds 126 
db Fin buffer'@ 


5 Eremple d'utilisation dé la fonction ZE 
BDUES eau D ; Appel du BDOS de CP/M. 


RÉNAME eau Change nom d'un fichier. 


s… 


A Cr RENAME 5 Modifie nom dy fichier 

ixi d: FCHREN ; Éone avec ancien et MOUVEeAU Noms, 
call BDOS 

inr a 

ie Evreuri Fichier Mon trouve, 


ÿ suite di programme 


FCBRENS db 
db 
db 
ds 
db 
db ESSAI L 
db "LD? 
db A, &, @, à 


end@ 


Nom du fichier à renommer. 


5 Nouveau nom 
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MONITEUR 


DESCRIPTION 


Le programme, initialement implanté à 
partir de l'adresse &9500, occupe un 
peu plus de 4K.octets (&9500,A61F). 
Les fonctions suivantes sont dispo- 
nibles : 

— Désassemblage ROM ou RAM, lis- 
tage en langage symbolique Z80. 

— Vidage mémoire ROM ou RAM 
(DUMP) en hexadécimal et en ASCII. 
— Assemblage, mini-assembleur à une 
passe. 

— Entrée de codes hexadécimaux. 

— Entrée de texte (ces deux fonctions 
à partir de l'assembleur). 

— Recherche d’une chaîne en mémoire 
vive ou en mémoire morte. 

— Exécution d'un programme, insertion 
possible d'un BRK simulé. 

— Déplacement d'octets vers le haut ou 
vers le bas de la mémoire. 

— Relogement du code déplacé par la 
fonction précédente (modification des 
adresses absolues internes). 

— Auto-déplacement du Moniteur. 

— Conversion hexadécimal— décimal et 
arithmétique simple. 

Les variables du programme sont logées 
dans la pile BASIC (à partir de &AE90). 
Une implantation adéquate ayant été 
choisie au préalable, la compatibilité avec 
un autre programme (BASIC ou langage 
machine) est cependant préservée car, 
au retour dans le moniteur, ses pointeurs 
sont réinitialisés. 

Un chargeur BASIC est proposé pour 
l'entrée du Moniteur en mémoire. Après 
l'avoir tapé, faites-en une sauvegarde 
immédiate par SAVE''MONLD. 

Si vous utilisez l'Editeur de Langage 
Machine (CPC n° 18), choisissez le 
mode 2, entrez le code en data à partir 
de l'adresse &9500 et vérifiez à l'aide 
des sommes de contrôle. Si votre 
machine est un CPC464, sauvegardez 
directement le code binaire conformé- 
ment à la ligne 70, sinon tapez les lignes 
30 à 70 puis RUN pour adapter le 
programme. 

Après sauvegarde, le lancement sera 
automatique par RUN''MON. 


MODE D'EMPLOI 


Appelez le Moniteur, CALL&9500. 

Sa position est affichée en haut de 
l'écran. 

Le symbole * indique qu'il attend l’en- 
trée d'une commande. 

A défaut d'entrée, RETURN seul, il y a 
retour au BASIC. 

La syntaxe générale d'une commande 
est soninitiale suivie d’une ou plusieurs 
adresses en hexadécimal, sans espaces 
et sans le symbole &. 

Deux exceptions, l'action sur la barre 
d'espacement suivie de RETURN efface 
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l'écran puis réaffiche la position du Moni- 
teur ; les touches 1 et 2 font la même 
chose tout en sélectionnant le mode 
d'affichage correspondant. 


Commande (L)ist, désassemblage 


— syntaxe : Ladresse(-adresse) 
<RETURN>. 

Cette commande affiche en continu le 
listing de désassemblage commençant à 
l'adresse spécifiée jusqu'à une adresse 
de fin facultative. 

L'action sur une touche quelconque pro- 
voque une pause. 

Alors, la suite du listing est obtenue par 
une nouvelle action sur une touche ou 
bien RETURN redonne le symbole *, 
attente d'une nouvelle commande. 

Si l'adresse de début le justifie, le choix 
du désassemblage de la ROM est pro- 
posé. Pour la ROM inférieure (si le moni- 
teur n'est pas installé dans la zone 
d'adresses correspondantes), il suffit de 
répondre ‘o’ pour oui si le désassemblage 
de la ROM est désiré ou d'appuyer sim- 
plement sur RETURN dans le cas con- 
traire. S'agissant des ROMS supérieures, 
on appuiera sur ‘O0’ (ou une touche quel- 
conque) pour désassembler la ROM 
Basic ou sur ‘7’ pour la ROM Disc ou sur 
RETURN pour la RAM écran. 

Si l'imprimante est branchée et sous ten- 
sion, l'impression est proposée. Répon- 
dre par ‘o'ui ou par ‘n‘on. Même procé- 
dure pour arrêter momentanément ou 
définitivement l'impression. 


Commande (D)ump, 
vidage hexa et ASCII 


— syntaxe : Dadress(-adresse) 
<RETURN>. 

Le contenu de la mémoire est affiché en 
hexadécimal, en continu à partir de 
l'adresse spécifiée et jusqu'à une adresse 
de fin facultative. Les caractères ASCII 
correspondants apparaissent sur la 
même ligne. 

Les caractères de contrôle sont ignorés 
et remplacés par un point. 

Procédures strictement identiques à cel- 
les de la commande ‘’L’ en ce qui con- 
cerne l’action sur une touche ou sur 
RETURN et les options ‘Rom’ ou ‘Imp'. 


Commande (Find, recherche 


— syntaxe : Fadress(-adresse) 
<RETURN>. 

Recherche d'une chaîne en mémoire vive 
ou morte. La deuxième adresse est facul- 
tative. Mêmes options ‘Rom’ ou ‘’Imp' 
que pour les commandes précédentes. 
La suite peut être exprimée en hexadé- 
cimal ; dans ce cas le premier code sera 
précédé du symbole &, exemple, soit à 
rechercher CD, 5A, BB (CALL &BB5A) 


dans le Moniteur : 

F9500-A61F ?:&CD5ABB 

Une chaîne de caractères ASCII sera pré- 
cédée d'un guillemet. 
Exemple : FO000-3FFF 
:‘’Amstrad 

Le joker @ ou 40 hexa peut être utilisé 
pour remplacer un ou plusieurs caractè- 
res, exemple la commande F8000- 
8FFF ?:&CD40BB recherchera tous 
les CALL &BB.. (avec aussi évidemment 
BB40). 

Dans l'exemple précédent la chaîne 
aurait pu s’écrire Am@tr@d. 

Si la chaîne existe en mémoire, la ou les 
adresses correspondantes sont affichées 
ou imprimées. 


(en Rom) ? 


Commande (Gjo, 
exécution d'un programme 


— syntaxe : Gadress <RETURN>. 
Lancement d'un programme en langage 
machine. Un RET en fin de programme 
assurera le retour au moniteur. 

Une facilité associée à la commande (G)o 
permet l'introduction d'un point d'arrêt 
à un endroit choisi du programme. 

— syntaxe : Gadress-adresse du point 
d'arrêt <RETURN>. 

Au point d'arrêt, le programme est inter- 
rompu avec retour immédiat au moni- 
teur. L'adresse est affichée ainsi que le 
contenu des registres à cet endroit de 
l'exécution du programme. 

Le point d'arrêt doit être choisi avec dis- 
cernement. S'il est mal placé, au milieu 
d'une instruction CALL ou JP par exem- 
ple, le pire peut arriver. 


Commande (Mjove, 
déplacement d'octets 


— syntaxe : Madress début-adresse 
fin > destination < RETURN >. 

Cette commande permet de déplacer un 
bloc de code vers le haut ou vers le bas 
dans toute la mémoire vive. Le transfert 
de ROM en RAM est possible. Cette 
option est proposée le cas échéant. 

Il n'y a pas de limitation particulière. La 
seule condition est que le bloc source 
existe, c'est-à-dire que l'adresse de fin 
soit supérieure ou égale à l'adresse de 
début. On doit s'assurer que le code à 
déplacer ne risque pas d'écraser des 
valeurs à préserver (adresses du système 
ou programme existant). 


Commande (Rjeloc, relogement du code 


— syntaxe : Radresse début code à 
reloger-adresse fin <RETURN>. 

Cette commande modifie les adresses 
absolues internes. Elle n’est pas utilisa- 
ble isolément et doit suivre immédiate- 
ment une commande (Mjove dont elle 
est un complément éventuel. 


Prenons un exemple concret : 

Soit un programme situé en &1000-2FFF 
à transférer en &4000 et à reloger. Des 
blocs de données (tables ou messages) 
sont insérés dans le code actif selon le 
schéma suivant : 


&1000 &1500 &154F &2000 &20FF &2FFF 
< > < > 
début code données code données code fin 
Les données ne doivent pas être traitées 
par la routine de relogement. La 
séquence des commandes sera : 
M1000-2FFF>4000 R4000-44FF 
R4550-4FFF R5100-5FFF 
Limitations : 
Le début du relogement doit correspon- 
dre. au premier octet d'une instruction 
(code opératoire). 
Le moniteur n'est pas capable de lever 
l'ambiguité qui peut se présenter entre 
ce qu'on appelle l'adressage absolu et 
l'adressage immédiat étendu. Par exem- 
ple, dans l'instruction LD HL,8D00, la 
valeur &8D00 peut désigner une adresse 
ou une constante sur deux octets. Cette 
dernière risque d'être affectée par un 
relogement intempestif. Cet inconvé- 
nient serait évité si les deux registres 
étaient chargés séparément (LD H,8D et 
LD L,00). 
Ilest nécessaire de connaître la structure 
du programme à reloger (instructions et 
données). Ce n'est pas toujours facile. 


Commande (X)mon, 
déplacement du Moniteur 


— syntaxe : Xadresse <RETURN>. 
Le Moniteur s'implante à l'adresse 
spécifiée. 

Il'utilise, pour se reloger, la routine de la 
commande précédente. 

Ilest immédiatement opérationnel à son 
nouvel emplacement. 

L'adresse choisie doit être comprise 
entre 0100 et 99FF. 

Le déplacement doit être supérieur ou 
égal à la longueur du moniteur (&1 120). 


Commande (A)ssemblage, 
mini-assembleur 


— Syntaxe : Aadresse de début d’'as- 
semblage <RETURN>. 

L'adresse spécifiée est affichée suivie de 
deux-points. 

Une instruction en langage d'assemblage 
peut être tapée suivie de RETURN. 
L'action sur RETURN seul assure le 
retour au Moniteur. 

Une instruction incorrecte, signalée par 
Bip, est effacée et l'adresse est réaffi- 
chée sur la même ligne. 

L'assembleur est strict en matière de 
syntaxe. 

Un espace doit suivre l'opérateur. Tout 
autre espace est interdit. 

Seul l'hexadécimal est reconnu pour 


REVENDEUR QUALIFIÉ 


MONITEUR 


l'opérande. Les valeurs ou adresses sur 
8 ou 16 bits doivent être écrites sans 
symbole &, sur deux ou quatre chiffres, 
c'est-à-dire avec leurs zéros non signifi- 
catifs (exemples : OF, 0100). 


La pseudo-instruction DEFW est incluse 
pour faciliter l'utilisation des instructions 
RST. Elle apparait au désassemblage 
après RST 08, RST 10, RST 18 et RST 
28. 


Entrée de code ou de texte 


En cours d'assemblage, l'entrée de code 
hexadécimal ou de texte est possible. 
Le code sera précédé du symbole &. 
Exemple : 9000:&CD5ABB 

Si l'entrée est incorrecte, elle est repro- 
duite sur la ligne suivante pour 
modification. 

Le texte sera précédé d’un guillemet. 
Exemple : 9000:''Bonjour 


Commande ’?', 
conversion, arithmétique 


La valeur hexadécimale (comprise entre 
O et FFFF) suivant le point d'interroga- 
tion est convertie en décimal. 
Additions et soustractions de deux 
valeurs sont possibles, ces dernières 
étant séparées par les signes + ou -, 
sans espace 


AO 


Propose une gamme complète et diversifiée 


d'ordinateurs AMSTRAD 


étudiée pour s’adapter à vos besoins. 


FAMILIAL 


CPC 464 
CPC 6128 


Elysées 26 

26, Champs-Elysées 
75008 PARIS 

45 62 18 56 

*Ouvert le dimanche 


PACS 


DISTRIBUTEUR 
AGRÉE 
228, rue du Fg Saint-Antoine 75012 Paris - Tél. (1) 43.711212 
Minitel (1) 43.567587 (mot de passe ACS]) 


TRAITEMENT 
DE TEXTE 


PCW 8256 
PCW 8512 


PROFESSIONNEL 


PC 1512 : SD-DD 
HD 10 millions 
HD 20 millions 


et assure la maintenance 


la formation 


la distribution et le développement des logiciels 


la vente des fournitures. 


228, rue du fg St-Antoine 

75012 PARIS 

43 71 12 12 

*Ouvert du lundi au vendredi 


Mini-informatique DPS 6 
Micro-informatique MICRAL 


# 
g:prie 


64, rue de la Chaussée d’Antin 
75009 PARIS 

48 74 06 78 

*Ouvert du lundi au samedi 


Ordinateurs personnels PC 
Réseaux 


19 FRINT'attendez,.." | 
15 A=%9506:F=RAGIF: Le106:WMILE AS=F:FOR A=A TO A+15:READ C$ 
29 KeVAL CMRUM+CS) S=S+k+655716%* (S+k3:32767) : POKE A,K:NEXT 

29 READ D#:T=VAL (CMEUAD#S):IF TES THEN 75 ELSE L=L+5:WEND 

F6 CLS: MEMORY &O4FF : FRINT"1. 464": FRINT"2. 664": PRINT"S. 6128" 
25 LOCATE 1,7:FRINT CHRK#$(7)3: "Tapez 1, #, ou =" 

46 R#=INFEYS#:IF R$&="UTHEN 40 ELSE K=VAL(RS#) 

45 IF R£1 OK RrT THEN 35 ELSE CLS:1IF KRzi THEN 76 

56 POKE S9BDA, 2SB-Ex (R=T) :K=%OA: FOKE 809576,K:FOKE 8959F,E 

59 FOFE SOBEG,E:FOEE 8&9BDS,K:FORE SODE1,F:POKE 89609, %A 

&4 FOFE BOOTS, &ûs FORE 89547, %65+5% (Re): FOKE 89548,8DE 

65 FOFE SASAD, &49+5% (Raï) 3:POFE SASAE,REF 

74 SAVE'"MON",E, 89560, 81126,280506: END 

75 FRINT CHRS& (7) 3 "Erreur ligne"sL:END 

DATA Z1,FF, AR, 11,46, 606, CD, CB, BC, CD,EC,95,21,ED,A5,CD,06923E 
DATA GC, A4, ED, 5, FD, AS, CD,2E,A4,3E, 2D, CD, 54,BB,26,11,19FE 
DATA 2E,1F.19,EB,CD,2E, 44, CD,67,9B,21,FF, AS, CD, 6C, A4, 18FC 
DATA 66,66, CD, D4,986, 26,1%, CD, 60, BB, 1, 41,08, 726,006, 2B,1E27 
DATA Le, 9B,2E, LD, 6e, B9, CE, 74, DD, 7E,FE, ZE, T6, 09, ee ie 
DATA ES, BA, C4, GE, BC, 18,B5,CD,5F, nr 18, A4, 18,CE, 


DATA &E,A4OE, 69, ED, A1,28,08,25,23,E6,16, F7LSE, 23, 56, F 
DATA ZA,FD, AS, 19,ES,21, A4, AC, CS, AB, AS, 21,FF,FF,268,069,23BCé6 


DATA CD,AS,A%,C9,EB,ED,52,19,D8,22,96,4E,CD,5F,96, CD, 45E 
DATA 2E,BD,21,6F,A6,D4,53,96,28,64,21,A3,AE, 24,3, A4, 4BE9 
A 96,D5,CD, SF, A4, 66,68, 544F 
DATA 33, A4, CD, 64, A4, 15, 5B6F 


Dé TA 18, Fé, Se de . LA; 21, AS, AE, CB,46,:8, o2,E6, 8:8F 
DATA EE D ae ou HE, LE, CD,45,44,17,16,694û 


DA Eb, CD, 80, 96, 30,04, CD, 1D, A4, CD, 85, 96,21, ŸS,AE,96,71F6 
DATA OF, AF, 77,25, 10, FC, C9, CD, 48, %6, 3E, 3F, CD, 54, BB, 06, 792% 
DATA 86,CD,C6,98B,FA,85,96,D5, 11,24, AD,CD,76,9B,D1,26,8276 
DATA DB,CD,67,9E,CD,8F,96, 26, ES a 
DATA ER, 11,24, AD, 14,ED, Sie FOLES, SA, PS AE, 4F, GD, 28, 9280 
DATA GA, LE, LA, BE, 23,728, FFFE, 46, eo Dé, es CD, 99CE 
DATA ZE, 44, CD, &A, A4, 13.18, CC, ES, 3A,92,AE, 69 CDs 6 4 ADS 
DATA EB,EI,C9,CD,48,96, CD, @C,A4,CD,86,EBE, rs C9, 7, ABS 1 
DAT FE, C9, 21, GE, A6, 20,08, FE, 46, D6, LA, FE, AS FE, 46, 21, BÈSE 
DATA GB, A6, D4, 55,96, DS,EE, 56, 4F, CD, O@F,B9,TALFE, AS,FE, BC81 
DATA 46,08,664,29,09,646, 80, 66,060, CE, 16,89, CD, 1D, A4, CD, L'EAE 
DATA 66, EBE, DC, 59,66, DB, 2A,96,AE, A7,ED,52?, 4 Lt, D, C9, CD, CCE 
DAT À AD, 96, CD, CF, FA, CD,8C, 96,36, Hu ta do 
DATA AE, DD,56, 66, 61, 21, 60, 40, 76, 4, GI, DEL: 
DT Le, Gé, ED, 59,26, 15,21,94,44, FE. dE, 30, 09 CD, 6B,E 
Li TE nésesat F5 ASUS, 80 4,5. LI « à Trio LEO 
DAT à : "Dés 16, POQFE, BAD FF, 97.FE, 40, Fé 7 
Li TA MP DE ; 0 DD,.%4, 40, SA, AC, AE, FES FE, GE, FEñé 
DATA SE, G8&,Ee, 91,30, CD, DF,AS,FI,FE, GA, 58, 66, D6,64, CD, 6586 
DATA CES, 96, CD, dé, A4, 1E, 1A,76,00, SF, CR, 7F, ls E 19, BAG 
Dé TA 23,EB,  CD,SE, A4,EB,15,C9,FE, 61,26 Cr, AD, AE FE, 12BE 
DATA 1, EG, GE, AF, CD, 7D,AS,ES, CD, 40, 97,E1,CD,26,A4,18, dE 
D'AT À E1,3E,16,CD,DF,A%, CD, GA, 97, CD, 26, A4, TA, AE, AE, 21, 
DATA C4, 45, Lo bB,AS, C3, 00, A4,FE, 62 en Gi, ED, 485, AD, RE 
DATA AFACD, DPF, AE, 794 fr 92,26, GE, CD, ; 
DATA sl CE, 45, A4, CD, 4,98,CD, 2A, A4, CD, 3 
DATA 5E:29) 03,45, A4. F5, À, SD: 70: a 
LATE se 1 2C, CD, A8,97,CD,26, 


CE 


ICO 


E16 
#15 
ED 


ea 
Éter— 
Eu | 
eee 

EE 
me ee 


546 
345 
F5 
355 
Et 
365 
7e 
275 
MAS LS 
285 
RATS) 
95 
HNSIS 
495 
416 


ep me 


HU TS) 
445 
455 Et 
#5 
466 
CRT 
47 @ 
475 
Es ei 
DAS 
490 
495 
F5 C4 (4 
5 i re] 
315 
De 


EE 
su) ai sd 


Lt? En 
hr Le 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
A rA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


ADATA 


DATA 
Léa À ri 
DATA 
DATA 
LATE 
L'ATÉ 


0%, 20 . : 
3 40,97, FE, 06,36, 
CE,52,97,DD0,54,60, AF, CD, D7. QU *CD, Eds A4. 1B, LA, 15, 7= 
CETE, A4, AF,CD,D7,97,CD,26, A4, SA, AE. AE,18,DE, CD, : 
64,98,18,F6,2%A,AC,.AE,FS5,Cé6,16,CD,DF,AS,FI,FE, 4, BSEF 
Da,FE,83,C6,CD,74,97,C05,26,A4,FE. CA.56,79,FE, 9610 
ED,.CA.,6%,99,FE,DD,CA,F9,99,FE, FD, LE FT ue ÉËs 7, nb 
BOLGE,TE, 68, CD, DF,AS, “A, AC mors pa! AS, C ë 
FE, 1, 26,20, TA, AD, AE,FE, 61,26 
AE,Z1,C4,AS,FE,OGS,CS,52,97,. Ce, =. 
AE,FE, GS, 2e, SE CD, SA, 97, RE “ 
CEE, 97, AF,CD,DF, AZ, Zi, CA, 45, CD, 40, A4, CE, 57. 77 CS. 
FE, 5, 20, @D, 3E, 69, CD, 7L, AS.ES, CD, 27, 98.El, SD 
G7FE, GE, 206,46, 24, AC, AE, A7, 26, GB,IE, 69, CD, 
C5,29,97,FE,64,28,20,DD,54,6@6 .FS,EE, E, CD, 
FI,FE, GS, 6, 6, CD, 71: 74 LD: 14,98, CD, ?A, Est 
A4,CD,ED,97,CF, 8%, , DPF: A3, CD, ZA, A4, 21. El 
CA, A5,CD,84C,A4,CD,858,97,C5,97,97,FE,04,26,6 L : 
HA, I1BAGSFE, 65,206, 0GE, TA, AD, AE,FE, GS,3E, 62, 
9B,SE, DA, 18. AB8,FE,66,26,069,DD,:4,66,CD,04, 
ED, 97, 3E, 08, RL Se A7, EE, 
2 k 3,28, 10. CDS, A4, CD, 1D, AD: 
BE, GP, CD, DPF, AZ, LE, 18H, EE 
à, DD, 24,646, 12, LA. 1B, CD, 
AE. Le, 18, CD, Res FE 
DF. 
13.18 1E. FE. 4, 
Tale losels 
D? 204 FE ga 


don 
AE, CD, AD, 76, CD,26, 4, C3. DA: 97 
AE, FE, OS,SE, LE, 28,062, Dé, 642, LS 
À 0 D 2e AD ee. 
GY ES, CD, 40, er 
FE, DD.28.02,25%,23,ES,01, HE, 
GBC, 11, BD, AS,ED, er 19.EE, 
47, CB, ?7F, DE, SE, 28,68, ED,44, 47,08, 2 
Eé, FA LFP, IF FF, iF CD, 57, A4, 77,28, FILLES, @f 
A4,77,1H,14,1E,CD,C2,A&,FE, CA,EA, SO, FE, 56, 
FE, 44,206, 2D,ED, 48, AB, 8E, 79, nn LE, FE 91. 
FE,FE. 4,28, 1 
BA, AE, AE, FE, & 28° F1, C3, 95, 90.FE. 6 
DEL FE! 76: 28.F2: 3! ACL AE FE. 06. 28.0 
bé, EM, E4, DD, 54, GO, TA, A7 AE, E* 
FE,E1,29,FS,FE,ES, 2€ 
FE FFE, ES, DS, 14 
AE,FE, GE, 26, EE, I 

Si LES AS, 11,680, ps. 01 D, a Et. 
His si pEs AS, AS EL 
Aa AE “77 : ? H,ï4,i1,8b, 
(CRUE 58: 15 de: aîs 7E« 
LE, € 3 5 2 
ÉD, ESseLbs 10 V8, 29. 
AE, CD,SF, à4, CD, 10, 


FE 


ET DE és BEA 
A, A4 TE, 1761 
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DATA 
CATA 
DATA 
LATE 
DATA 
DATE 
DATE 
LATA 
DATE 
DATE 
DATE 
RATS 


Dé T fà 
L fi 


NTSRRS 
DA Dé 


A4, 


,28,66,12 


EG, 


LD, 66, A4, 16,EF 


FPS ER 
ME 


an no 4 AE 


Ho, AE = = 


AE. » 


28, 
1%, 
BE, 


su Et 


6, E 


EG DATA 
HS DATE 
SG DATA 
GES Lei Tr 
Le DATA 
715 LATE 
E DAT 
DATE 
Léa T à 
! Dé Té 
Gate Dit 
GAS DATA 
Se DATÉE 
GES DATA 
Li TE 
Dé TE 
L'été 
LT à 
DAT é 
Liéi Ti 
Léa T éà 
Dé Dé 


DATA 
Lit Téà 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
Liéi T6 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


Dé Dé 
DATA 


sa pe DS, 


DATA 


79, cs. 1 
SE 


CD, BA, € 
SC, 21, AE 
ED, AZ, 79 


GA, LE 


77 
98, AE, 
be 
47, 81,8 
AE, 
CD, 


3 FE 


AE « Dés Gé, CT 
FE 


Êri, LE, été 
96 . ae nus 


AB, BE, 
20 MS 


6 4 GE oo. 


ét à 


me 


51. AF AE, = 
à no ÉE 


.! En be 
# 4 


Es ED; 


“Ra 
: 6 n Di, ED, 4 


DATA 1m, 
DATA 18,04,FE,2B,C 
DATA ne A de à 64,CD,SA.BE, 


LEE, 74, A7 


17 CB, “ SA, BE, E9SE 
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DATA EB,ES, CD A9, A2, EL, 7C A7, FA, 88, 48,C5,67,9E,7D, 
DATA F£,67,98B, Es ae gr FH ra Ense AS CD BE, ABSE, 
LA T ie BE, CD, 80,89, CD, 79,EE, CZ 
Dé TA CS TON SF (O7, TDR er. 

LA Té AL, : Le AE, 
Dé Té 1F «C9.6 
Té CE, AS, CEE 


LE 


HE, 


40 


De TA 
LA T éà 


Liét, 5 
Dés é LÉ 
LE, 4F 
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REVENDEUR OFFICIEL AMSTRAD FRANCE 


DIGITALISEUR ARA 

Ce digitaliseur vous permettra non seulement de 
digitaliser des images vidéo provenant d'une ca- 
méra mais aussi des images provenant direc- 
tement de votre T.V. Un logiciel très complet 
vous permettra d'embellir, retoucher, stocker... 
les images digitalisées. Entièrement français. 
digitaliseur ARA 


En peurs 


PCW 8256 


PCW 8512 


2® ect. PCW 8256. 


OC] intert. RS 232/centronic 


Disquettes vierges 
à l'unité 


Le “must” pour les amateurs de graphisme. Utilisée 
par la majorité des créateurs de logiciel cette tablette 
vous séduira par sa simplicité d'utilisation et la qualité 
“top niveau” des résultats obtenus. (ex. options : faire 
des points, traits, boîtes. cercles, texte, remplir, “zoom”.….) 
graphiscope Il (avec logiciel cassette) 

graphiscope Il (avec logiciel disquette) 


produits DART 
STYLO OPTIQUE : De loin le meilleur de tous, 
le stylo optique DART à fibre optique vous 
permettra de réaliser de véritables chef d'œu- 
vres. Fourni avec logiciel d'exploitation très 
complet. 
D stylo optique 


PRO5000 .... 


—m-9 PEL 
Ktronics 
Les complices de vos Amstrad 


PCW: 

Dextension 256k 
Dextension horloge 
interface joystick 

interface joystick + musique 
CPC: 

64K pour 464-664 . 

0256 K silicon disc pour 6128 . 
256 KRAM pour 6128 
O256 K silicone disc pour 464-664 . 
0256 K RAM pour 464-664 
crayon optique 6128 
Ccrayon optique 464 


joystick compétition 
170F 


Th 
Mèrt 


CPC6128 


# SUPER-PROMOTION 
O CPC 6128 coul + impr. 


CPC 6128 monochrome 
CPC 6128 couleur 

CPC 464 monochrome 
CPC 464 couleur 
imprimante DMP 2000 
interface RS 232 (Amstrad) 
souris 

ler lecteur de disquettes 


SCANNER GRAPHIQUE : Ce scanner, très sim- 
ple d'utilisation, vous permettra de digitaliser 
toute image sur support papier, à partir de la 
DMP 2000. Fourni avec un logiciel d'exploita- 
tion très puissant. 

scanner graphique “DART” 


2ème lecteur de disquettes 
mangétophone (avec câble) 
câble magnéto 


SYNTHÉVOC 1 


ne lui manque que la parole”, synthé. VOC1 la lui donne 
Câble imprimante AMSTRAD Très performant ce synthétiseur vocal va vous permettr 
Vous permet de connecter votre AMSTRAD à n'im- de rendre votre ordinateur plus bavard qu'un politicien er 
porte quelle imprimante au standard “centronic”. campagne ! 


Rallonge alimentation + vidéo 

ne soyez plus collé à l'écran, rallonge 464 . 

ne soyez plus collé à l'écran, rallonge 6128 180 F 

housse pour moniteur + clavier 175F 
{préciser couleur ou monoc.) 

ruban imprimante DMPI (par 2) 

ruban imprimante DMP 2000 

adaptateur peritel tous CPC 


130F 


TeGyhts Mysuet 


PAL St 
16 chaine : “| 
UHF-VHF 
haut-parleur integre 
sortie casque 


0 câble imprimante synthétiseur vocal 549 
7 logiciels vocaux sur disquette ......... .1951 
C D C D C D c D 
bob winner … 185F  kidkit D280FC280F  microscrabble D199F0245F  billylabanlieue 199F  thanatos 95F 0 140F 
bomb jack 2 100FO1S0F  konamiscoinophits … [J110FU145F  missiondelta .. D120F0199F  robbot.…… 175F  assimilanglais . 550 F CI 590F 
bridge ….… 265F0299F  l'aigled'or 160FC199F  monopoly … 175F0225F  saphiens 180F  theysoldamillion(n’1). D 110FC170F 
budget familial . 140F0220F  lacuisine française 199F  muitiplan D498F  silentservice . 160F  theysoldamillion(n°2). C105FC150F 
calcumat D450F  lasolution … D950F  nemesis . 95FD145F strike force haa 110FO160F  theysoldamillion(n3). © 105F 01 150F 
carte de france 150FO190F le5°axe ….. 120F0120F orphée … D275F0295F  stryfe D150FC0220F  trailblazer 110F0160F 
city sliker …. 100FC140F  diam.îlemaud … D180F0220F  pagemaker . 600F  superpac(pacman). 105F0150F trivial pursuit. 185F0215F 
colossus chess 110F0145F le secret du tombeau D 160F0199F antiriad 95F0135F sword and sorcery … 130F0150F uchimata 115F0160F 
sas . D PRESSE lee RE Tec EE arkanoïd 105FC160F  tasword …… D275F0399F  wintergames 110F 0 140F 
ata ma es cavernes dethénené. 11'TEUFLIISUT asphalt textomat … 450F ie arkungfull .......... 
dbase || 790F les passagers du vent … 290F 0 290F sspnalt EUSSFEEUSE k : MOEELSSE 
dessin 3D : 245F les templiers d'Orven … 180FC0220F 
autoformationäl'assem. C1195F0295F  lorigraph… 195F 0 295F LOGICIELS PC 
fer et flammes (2 disq.) 295F loto …. 125F0175F alexhiggin's snooker … deep space... paiegipsi … 
fighter pilot .…. 100F0150F m'enfin 145F0185F alienor 2 évolution sunset pitstopl 
floopy (magazi 38F 69F ma.base … 165F alteregofemelle . F-15 strike eagle progolf 
future knight. 110FD155F  macadambumper 145F0240F alter ego male facturation stock fassi … silent service 
gauntlet … 105F0145F manhattan 140F0180F arsène farsight soloflight . 
grand prix 500 . D150F0180F  maracaïbo 135F0175F Dbob winner. five side soccer .…..... 99F starglider . 
gunf. + waytig. + visit. D154F0195F masque . . D185F Oboulderdash gem draw … … 990F subbattle . 
hit pack n° 1 (4log) …. 100FC140F  mastertronic disq. Le 1 99F Oboulder dashlll gestion LPC . .4980F superaclc 3 
hit pack n°2 É log.) à 105F0150F mastertronic disq.n° 2 … 99F CObruce lee infiltrator …240F  Utera.……… 
infiltrator . 115F0145F mastertronic disq. n°3 O 99F calcomat… la compta. (mensoft) … 1990F textomat … 
miami vice - 150F Ccompta LPC les passagers du vent. 325F  CVPplanner 
campta.saari … MOT ces .… 215F winter games 
LOGICIELS PCW crusade in europe . maître des mots … 255F wordstar 1512 
alienor… .…. 1095F  Dforce4 + miss. detector. 190F  Cipolyprint+ polyword …. 490F cyrus 2 chess mallette practi. 990 F world games . 
guardian 170F frank bruno'sboxing …. polyprogram.. ..1185F dambuster … mean 18 golf … … 199F Vea you can … 
azerty 245F genecar ..…....... quick mailing .190F datamat multiplan junior … 699F 
batman 185F  DGPII+ mailings SAS. raid . .160F dbase 11 ninja … 
blocus 185F graphologie + biorythmes 199 F sam... .290F LIVRES 
bob winner 240F heathrow air control 180F seatalker .265F 
bounder ..…. 205F histoire d'or gs sorcerer … .265F peeks pokes du cpc . .. 99F routines du cpc. . ... 
bridge player 195F infidel spellbreaker .265F rsx et rout, ass. sur cpc 200 F liv. lect. disq. cpc. . .. je débute basic amstrad 91 F 
cobol (not. angl.) 550F la paie cresus . spool . 350F cp/m + sur cpcetpcw 100F cp/m + sur cpc et pcw 100 F grd livre dupcw amstrad 179 F 
campagnon .280F langage “C” {not. are .550F starglider .…. .240F graphis. et sons du cpc.. 129 F graphis. et sons du cpc 129 F livre du basic 1512 .. 179F 
compta. gene. (aiphaso) 175F multiplan … steve davis sno .175F la bible des cpc. . . .. 199F la bible des cpc .... 199F livre du gem pc 1512 .199F 
damoclès …. 1750F mynea … strike force harrier .185F 102 prog. sur amstrad .. 120 F routines du cpc . 149F livre logo pcw et cpc .…149F 
datamat PCW … 590F orphée tassword 8000 . .450F amstrad à l'école. . .. 120F liv. lect. disq. cpc ... 149F multiplan sur amstrad . 195 F 
dbasell 790F PCW graph . tomahawk … .180F amstrad en famille. .. 120F peeks pokes du cpc .. 99F prog. math. sur cpc .. 150F 
enchanter 265F PCW paint se top secret .275F amstrad en musique . . 165 F rsx et rout. ass. sur cpc 200 F programmation sur PCW 149 F 
exbasic. 250F polymail + polyword ..….. 460F trivial pursuit …. 230F clefs pour amstradt1 .140F bien débuter pcw. . .. 129F trucs et astuces pc 1512 179 F 
fairlight … .…. 160F polyplot + polices n° 1... 460F  Cirotate.......... 350 F lefs pour amstrad t2.. 155F bien débuter pc 1512 ..149F guide réf. tech. 1512 ..249F 


COMMENT COMMANDER : Cocher le(s) article(s) désiré(s) ou faites une liste sur feuille à part - Faites le total + frais de port (20F F pour achats inférieurs à 500 F, 20 F de: 500 à à 1000 F, 80 F pour achat supérieur à 2000 F) 


ORDINATEUR : CI PC 1512 6128 coul. 


6128 mono. [] 464 coul. 1 464 mono. 18256 1] 8512 


Tous nos prix sont indicatifs 


NOM 


TÉL. CODE POSTAL VILLE 
contre-remboursement (prévoir 20 F de frais) — envoyer le tout à : ORDIVIDUEL, 20, rue de Montreuil 94300 VINCENNES. 


VENTE AUX COLLECTIVITES : numéro réservé : 48.86.9284 


ADRESSE 
Mode de paiement : 


chèque / [] mandat / 


RESTAURATION DE 
LA MEMOIRE BASIC 


Bernard BESSE 


Le manuel du CPC 464 dit ceci à propos de HIMEM : 
‘Avant de redéfinir l’octet le plus haut avec la commande MEMORY, il est souhai- 
table d'écrire mm = HIMEM. Vous pourrez après retourner à la capacité de mémoire 
précédente avec la commande MEMORY m.'’ 
Le manuel mentionne donc la question de la restauration de la mémoire et c’est 


bien. 


Malheureusement, le problème est d’une part mal posé, d'autre part mal résolu. 


Nous proposons une procédure tout à 
fait différente de restauration mémoire. 
Mais, auparavant, nous devons répondre 
aux 3 questions suivantes : 

— Est-il utile de restaurer la mémoire 
(autrement que par RESET) ? 

— En quoi le problème est-il mal posé 
dans le manuel ? 

— Pourquoi est-il mal résolu ? 


FAUT-IL RESTAURER 
LA MEMOIRE ? 


Sauf en cas de RESET, tout programme 
‘‘hérite’’ de l’organisation mémoire 
léguée par son prédécesseur. Cette orga- 
nisation a pu, éventuellement, être modi- 
fiée par des commandes en mode direct. 
Cette ‘passation de suite’’ se fait évi- 
demment pour un même programme 
d'un RUN au RUN suivant. 

L'erreur bien connue ‘'improper argu- 
ment’’ intervenant au 2e RUN d'un pro- 
gramme commençant par : 


SYMBOL AFTER nnn 
MEMORY zzzz 


tient au fait que le 2° RUN hérite des 
zones SYMBOL et MEMORY créées par 
le 1e et que le BASIC refuse alors de 
créer une 2° zone SYMBOL. 

La mémoire BASIC peut être réduite par 
la réservation des zones suivantes : 


SYMBOL AFTER (0 à 1 zone) 
MEMORY (0 à 3 zones) 
FICHIER (0 à 1 zone) 


Nota : s'il existe une zone FICHIER, il 
existe au moins une zone MEMORY, car 
nous supposons une pratique sans faille 
de : 


OPENOUT‘‘bidon'":MEMORY HIMEM-1: 
CLOSEOUT 


Voici un exemple de configuration à 5 


zones qui peut surprendre, mais qui est 
tout à fait possible. 


106 


Il faut, pour la réaliser, commencer par 
faire SYMBOL AFTER 256 caril ne peut 
y avoir qu'une seule zone SYMBOL 
AFTER, comme nous l'avons vu. 


BASIC BAS 

Memory C (souvent 1 octet) 
Fichier (4096 octets) 
Memory B (B octets) 
Symbol (8 à 2048 octets) 


(A octets) 


Memory A 
Ram Systeme 7 HAUT. En 


Ilest probable que les petits programmes 
n'ayant pas de besoins particuliers pour- 
ront s’accommoder d'un tel héritage. 
Mais pour : 

— les gros programmes, 

— ceux qui ont besoin d'une réservation 
d'espace à une adresse précise, 

— ceux qui ont besoin d'une zone 
SYMBOL AFTER plus importante, 

il ne peut être question de conserver l'or- 
ganisation léguée par le programme 
précédent. 


Par ailleurs, la solution bien connue qui 
consiste à faire RESET pour réinitialiser 
la mémoire n'est pas sans inconvé- 
nients : 

— effacement des instructions KEY, 
— effacement du programme en cours, 
— pas de possibilité d'écrire RUN et 
LOAD dans un programme pour appeler 
le programme suivant. 

On peut donc affirmer qu'il est très sou- 
haitable de pouvoir restaurer la mémoire 
autrement que par RESET. 


EN QUOI LE PROBLEME 
EST-IL MAL POSE ? 


Il est mal posé parce qu'il est plus logi- 
que de restaurer en DEBUT qu'en FIN de 
PROGRAMME. 

En effet, pour un programme donné, la 
restauration au début donne la certitude 
d'avoir une organisation mémoire 
convenable. 

Dans l’autre cas (restauration en fin), 
cette certitude ne peut s’obtenir qu'en 
programmant la restauration mémoire 
dans TOUS les programmes susceptibles 
de précéder le programme concerné. 
De plus, il faudrait s'interdire l’utilisation 
des ordres MEMORY, SYMBOL AFTER 
et OPEN en mode direct. 

Pour illustrer le caractère sournois d'un 
oubli, voici un petit exemple : 
Supposons qu’un programme hérite 
d'une zone MEMORY 30000 et qu'il ait 
besoin d’une zone MEMORY 40000. 
Le programmeur qui suit le Manuel 
écrira : 


mm=HIMEM "donc mm= 
30000 

MEMORY 40000 "la mémoire 
monte à 40000 


(sans problèmes 
supposons-le) 


MEMORY mm "la mémoire 
baisse à 30000 
valeur 

"léguée au pro- 
gramme  sui- 
vant.Bravo ! 


LA PROCEDURE’’mm = HIMEM 
N MEMORY mm”’’ 
DU MANUEL NE MARCHE PAS 


Procédons à un certain nom- 
bre d'essais dans les conditions ci- 
dessous : 


a) Par hypothèse, les instructions suivan- 


{1} mm: HIMEM: MEMORY HIMEM-1000 


MEMORY mm OUI 


(21 SYMBOL AFTER 128: mm =HIMEM: MEMORY HIMEM 1000 


MEMORY mm 


Nota : HIMEM fin -HIMEM deb-1024 


MEMORY mm 


MEMORY min 


n=1000:DIM a$(n) 
h1-- TIME: MEMORY mm 


Nota : Memory full (en Memory mm) 


PRINT USING‘ # # # #.4 #'":(TIME-h1)/300 


NON 


(3) mm - HIMEM: SYMBOL AFTER 128: MEMORY HIMEM 1000 


NON 


Nota : Memory full (en MEMORY mm) 


{41 mm = HIMEM: OPENOUT ‘‘bidon'": MEMORY HIMEM 1: CLOSEOUT 


NON 


(5) mm =HIMEM: MEMORY HIMEM 1000 


‘+ FORK-1 TO n: a$(k)=""""+'""MEMORY OPEN- SYMBOL'':NEXT k 


oui en théorie 
non,en pratique 


Nota : entre MEMORY mm et la fin s'écoulent 3m.42s. nécessaires à la 


réorganisation des chaînes à la nouvelle adresse supérieure du BASIC. 


tes font partie de chaque essai : 

— RESET et SYMBOL AFTER 256 
avant chaque essai. 

— PRINT HIMEM au tout début et à 
l'extrême fin de l'essai. 

b) Les caractères N délimitent les ins- 
tructions centrales (non écrites si elles 
sont sans intérêt). 


c) Les résultats sont notés : 
OUI si HIMEM fin =HIMEM deb 
NON si ERREUR ou si HIMEM différents 


Conclusion des essais 


Le procédé du manuel est à rejeter pour 
les raisons suivantes : 

— MEMORY ne peut pas récupérer une 
zone SYMBOL AFTER (seul SYMBOL 
AFTER 256 peut le faire). 

— MEMORY ne peut pas récupérer une 
zone FICHIER OUVERTE (seul CLO- 
SEOUT et/ou CLOSEIN peuvent le faire). 
— MEMORY ne peut récupérer une 
zone FICHIER FERMEE (du genre OPE- 
NOUT ‘'bidon'') qu'à une seule 
condition : 

Au moment où l’ordre MEMORY va être 
exécuté, la valeur de HIMEM doit être 
celle créée par l’ordre OPENOUT (avant 
le MEMORY HIMEM-1). 

C'est ainsi que l'essai n° 4 réussit si l’on 
remplace MEMORY mm par MEMORY 
HIMEM + 1: MEMORY mm 


UNE AUTRE SOLUTION 


La solution du problème réside dans l’uti- 
lisation de 2 adresses gérées par le 
BASIC. 

Ces 2 adresses se trouvent en AE7B/C 
(il s'agit tout simplement de HIMEM) et 
le couple d'octets voisin en AE7D/E. 
Nous appellerons MEMOIRE LIBRE (ou 
plutôt mémoire libérable par MEMORY) 
et en abrégé MMLIB cette 2° adresse. 


Utilisation de 
MMLIB et HIMEM 


MMLIB est la valeur maximum du para- 
mètre que l’on peut associer à MEMORY. 
Nous avons toujours MMLIB > =HIMEM 
En conséquence : 

Si HIMEM<MMLIB on doit faire 


MEMORY mmlib 

Si HIMEM=mmilib, MEMORY ne doit 
plus être utilisé (car l’ordre MEMORY 
HIMEM n'a aucun effet). 


Nous avons alors 2 cas de figure théori- 
quement possibles : 


a) Nous sommes 1 octet plus bas qu'une’ 


zone FICHIER OUVERT. 


b) Nous sommes 1 octet plus bas qu'une 
zone SYMBOL AFTER. 


Puisque nous restaurons en début de 
programme, le cas a est éliminé car 
aucun fichier n’est ouvert en début de 
programme. 

Reste le cas b que l'on traite par 
SYMBOL AFTER 256. 

Ceci se traduit par les 2 lignes de BASIC 
ci-après : 


100 mmlib =PEEK(&AE7D)+2656* 
PEEK(&AE7E):IF  HIMEM < mmilib 
THEN MEMORY mmlib:GOTO 100 

200 hiold=HIMEM: SYMBOL AFTER 
256: IF HIMEM>hiold THEN 100 


On pourrait, pour arrêter le processus, 
comparer HIMEM à la valeur MAXI de 
42647 (ou 44031 pour les cassettes), 
au lieu de vérifier que sa valeur reste 
égale à HIOLD. 

Malheureusement, l'utilisation de cer- 
taine(s) routine(s) du système d'exploi- 
tation a pour résultat apparent de dimi- 
nuer le MAXI en le rendant égal à la 
valeur du HIMEM courant. 

C'est en effet le regrettable comporte- 
ment de la routine &BB4E utilisée 
inconsidérement. 

Ainsi, le petit programme : 

RESET 

SYMBOL AFTER 256 


100 PRINT HIMEM' 42747 à la 1ere 

itération 

puis 42619 puis 

42491 etc. 

110 SYMBOL AFTER 240 

120 CALL &BB4E 

130 SYMBOL AFTER 256 ‘ ne fait rien 
(HIMEM non 


100 


_ 


augmenté) 
140 GOTO 100 


grignotera la mémoire BASIC à raison de 
128 octets à chaque itération avec 
‘’memory full” pour HIMEM = 16507. 
L'explication peut être considérée 
comme la suivante : 

Call &BB4E met à zéro l'octet &B295 
Cet octet a la valeur 255 lorsqu'une 
matrice de caractères est définie, la 
valeur O après un SYMBOL AFTER 256. 
Par ailleurs, l’octet B294 contient le 
numéro du 1e caractère ‘'utilisateur'’. 
Par exemple, on aura : 

— Après SYMBOL AFTER 240 : 
B294 = 240 et B295=255 

— Après SYMBOL AFTER O : 
B294=0 et B295=255 

— Après SYMBOL AFTER 256 : 
B295=0 et B294=0 

On voit que la valeur de B295 permet de 
distinguer SYMBOL AFTER 256 et 
SYMBOL AFTER O qui sont notés tous 
deux zéro en &B294. 

Call &BB4E fait en quelque sorte 
‘’croire’’ au système qu'on vient de faire 
un SYMBOL AFTER 256, alors qu'il n'en 
est rien. 

Sur cette base frauduleuse, le système 
considère alors que MAXI =HIMEM. 
Nous n'avons pas trouvé un moyen sûr 
de contrecarrer les agissements delétè- 
res de &BB4E (que cette routine soit 
appelée à partir du BASIC ou d'une rou- 
tine machine). 

Il y a donc lieu, soit de s'en tenir aux 2 
lignes de BASIC précédentes, soit d’ajou- 
ter une 3e ligne pour ‘‘prévenir'’. On a 
alors : 


100 mmlib = PEEK(&AE7D) + 256*PEEK 
(&AEË7E):1F HIMEM <mmlib THEN 
MEMORY mmlib:GOTO 100 

200 hiold =HIMEM: SYMBOL AFTER 
256: IF HIMEM > HIOLD THEN 100 

300 MAXI=42747:1F HIMEM<maxi 
THEN PRINT'HIMEM'HIMEM; 
#<""; MAXI; ''-Faire RESET"" 


La valeur de MAXI est bien entendu à 
remplacer par 44031 pour les systèmes 
à cassette. 

Ilest souhaitable de stocker ces 3 lignes 
sur disque (ou sur cassette) sous format 
ASCII. 

Elles pourront être exécutées par RUN ou 
intégrées par MERGE aux programmes 
qui ont besoin d'une restauration 
mémoire. 

Notons que MMLIB, HIOLD sont des 
variables réelles. Il faudra donc fusion- 
ner ces 2 ou 3 lignes avant un ordre 
DEFINT éventuel. 


Les articles suivants, parus dans CPC, 
précisent certaines questions : 

— Le bug de l’openout (Michel Archam- 
bault) : n° 3, p.48. 

— Fichiers (Michel Archambault) 
n° 18, p.22. 

—  Symbol After (Michel Archambault) : 
n° 12, p. 44. a À 

— Test (Patrick Guyon) : n° 19, p. 89. 
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GEM SUR AMSTRAD PC 
por Digital Research 
168 pages - 185 FF Réf. SIP 1 


Ce livre constitue une découverte complète et progressive du 
logiciel GEM. et de ses principales applications GEM Paint 
GEM Write, GEM Graph et GEM Wordchart 

Des explications claires et pratiques permettront aux débu- 
tants de mieux manipuler les disquettes GEM. les fichiers. la 
souris, ils trouveront également des menus déroulants et toutes 
les abréviations et commandes de GEM utilisées 

Voici un ouvrage également indispensable pour mieux com 
prendre en quoi GEM et l'Amstrad PC peuvent résoudre des cas 
concrets en milieu professionnel ou semi-protessionnel 


CLEFS POUR GEM SUR AMSTRAD PC 
par Daniel Martin 
288 pages - 195 FF Réf. SIP 2 


Voici un livre de référence pour les programmeurs avertis sur 
Amstrad PC Ils pourront 

- retrouver facilement les différents constituants de GEM 
(GEM VDI, GEM AES), 

- étudier successivement le constructeur de ressources RCS, 
la description d'un programme GEM, l'éditeur d'icônes, etc, 

- tirer profit des trucs et astuces très utiles donnés par l'auteur 
Ils pourront enfin programmer leurs propres applications gra 
phiques sur ce magnifique outil qu'est GEM 


DOS PLUS SUR AMSTRAD PC 
par Daniel Martin - Collection Digital Research 
200 pages - 145 FF Réf. SIP 3 


Cet ouvrage s'adresse aussi bien aux débutants qu'aux utilisa 
teurs plus avertis cherchant des informations sur ce système 
d'exploitation DOS Plus sur Amstrad PC est une découverte 
complète et progressive de ce logiciel permettant de faire tour 
ner des programmes sous MS-DOS ou CP/M 86 Après une pré 
sentation générale de l'Amstrad PC, les premiers chapitres du 
livre constituent une approche de DOS Plus (opérations sur les 
fichiers, fichiers batch, éditions de textes, etc ) La deuxième 
porte de l'ouvrage approfondit les caractéristiques les plus 
évoluées de DOS Plus (utilisation approfondie des répertoires, 
programmes d'arnère-plan, gestion de l'imprimante, etc ) 


FONCEZ AVEC L'AMSTRAD PC 1512! 
Cedic/Nathan 

par Brian C. Thomas 

208 pages - 98 FF Réf. SIP 4 


Cet ouvrage de l'Amstrad PC 1512 est conçu comme un guide 
de l'utilisateur indispensable lors de l'achat du matériel 
Lutilisateur y trouvera un chapitre spécial sur le MS DOS, sur la 
communication, sur le Basic 2, sur les logiciels, sur les exten 
sions et périphériques additionnels, etc 


GESTION SUR AMSTRAD PCW 
par J.-M. Jego et J.-M. Gargadennec 
240 pages -175 FF Réf. SIP 5 


Découvrez progressivement sur votre Amstrad 3 logiciels com 
plémentaires Locoscript, dBASE Il et Multiplan Ce hvre vous 
propose des modèles et des tableaux debordcommentés Vous 
pourrez les adapter à votre propre contexte si vous êtes com 
merçants ou travaillez dans une PME 


CLEFS POUR AMSTRAD PCW 
par Jean-Jacques Weyer 
240 pages - 215 FF Réf. SIP 6 


Voici un livre complet et indispensable, d'utilisation simple et 
pratique pour l'utilisateur de l'Amstrad PCW 

I! détaille tout ce que vous vez besoin de savoir surle Basic Mal 

lard, Locoscript (logiciel de traitement de texte du PCW), Multi 

plan, dBASE Il et CP/M Plus 

L'auteur a développé pour chaque applicationles diverses com- 
mondes illustrées d'exemples concrets, les fonctions et opéra 

teurs, les messages d'erreur, etc 


ss DE nu 
mm” 


BON DE COMMANDE 


A renvoyez avec votre règlement à STAMP DIFFUSION, 


17, rue Russeil 44000 NANTES 
Frais de port en sus: 25F 


Ci-joint mon règlement par chèque ou mandat. 


ET A L'ECOLE 
par D. Nielsen et A. Garcia-Ampudia 

232 pages - 120 FF Réf. SIP 7 

Cet ouvrage, destiné aux parents, élèves et enseignants, est 


conçu pour aborder ou réviser les matières principales des 
classes du primaire : le calcul, le français et l'éveil 

21 programmes d'enseignement sont proposés aux lecteurs 
ainsi qu'un cahier de vacances qui permettra aux enfants de 
concevoir eux-mêmes de petits programmes 


CREATION ET ANIMATIONS GRAPHIQUES 
SUR AMSTRAD 
par Fouchard et Corre 
128 pages -110 FF Réf. SIP 8 


Vous apprendrez, grâce à ce livre, à créer des images telles 
qu'un pinceau, un aérographe, à animer vos dessins avec des 
Scrollings. des inversions ou des reconstitutions d'image point 
parpoint, ceci à l'aide dela souris et dela manette dejeu Les pro 
grammes sont écrits en Basic et en assembleur 

A vous ensuite de réaliser vos propres ‘bandes dessinées élec 
troniques” 


TROIS ÉTAPES VERS 
L'INTELLIGENCE ARTIFICIELLE 
SUR AMSTRAD CPC 
par R. Descamps 
280 pages - 160 FF Réf. SIP 9 


Informaticien ou non, découvrez trois facettes de l'intelligence 
artificielle à travers des exemples simples et pratiques et 
27 programmes en Basic qui utilisent toutes les ressources de 
l'Amstrod - Apprenez à votre ordinateur à simuler un pilote auto 
matique, à jouer contre lui-même et créez vos propres systèmes 
experts 


RSX ET ROUTINES ASSEMBLEUR 
SUR AMSTRAD CPC 
por D. Roy et J.-J. Meyer 
368 pages - 200 FF Réf. SIP 10 


Voici un manuel de programmation enassembleur Z 80 En deux 
parties distinctes, l'une sur le graphisme, l'autre sur les mathé- 
motiques, l'ouvrage présente de nombreux programmes 
assembleur, largement commentés et expliqués Unouvrage de 
haut niveau 


TURBO PASCAL SUR AMSTRAD 

par P. Brandeis et F. Blanc 

224 pages -135 FF Réf. SIP 11 
Ou comment maîtriser progressivement ce langage Comment 
installer des programmes en Assembleur à l'intérieur des routi 


nes Pascal. Retrouvez dons ce livre toutes les instructions expli 
quées et illustrées 


AMSTRAD 3D 
par J.-P. Petit 
264 pages -195 FF Réf. SIP 12 


Celivre propose un programme Basic pour créer des formes, les 
dupliquer, les réduire ou les agrandir, et surtout pour les vision- 
ner sous différents angles entrois dimensions (hauteur, largeur, 
profondeur) Un menu présente toutes les manipulations possi- 
bles, et tous les dessins se font à partir du clavier (nul besoin de 
manette de Jeu où de souris) L'ouvrage est abondamment 
illustré de dessins et de copies d'écran 


SX ny 
RE um = 


— 
DIFFUSTID 


GRAPHISME EN ASSEMBLEUR 
SUR AMSTRAD CPC 
par F. Pierot 
304 pages -145 FF Réf. SIP 13 


Pour créer des graphismes très variés (tracé d'histogrammes, 
dessin d'un paysage, création d'une corne d'abondance) tout en 
exploitant toutes les possibilités graphiques de votre CPC 

Si vous êtes débutant en assembleur, vous pourrez progresser 
grûce à des routines prêtes à l'emploi livrées sous la double 
forme d'un programme Basic et d'un listing assembleur 


LE LIVRE DE L'AMSTRAD 
por D. Martin et P. Jadoul 
256 pages - 120,00 FF Réf. SIP 14 


Une étude complète des circuits et de la structure interne de 
l'Amstrad, ses fonctions et les instructions mal connues du 
Basic (VARPTR ), une présentation détaillée des RSX pour 
ajouter de nouvelles commandes au Basic et de nombreux pro 
grammes pour simuler les commandes de scrolhing, coloriage 
manipulation vectorielle 


PROGRAMMES POUR AMSTRAD 
Cedic/Nothan 

par H. Cador et S. Houel 

128 pages - 89 FF Réf. SIP 15 


Cet ouvrage permettra à l'utilisateur de jouer et de programmer 
avec Amstrad CPC (464, 664 et 6128) en Basic ou en assem 
bleur 

Ilexplique comment construire soi même un ‘Space Invaders” 
de haute gamme, un synthétiseur musical ou un générateur de 
courbes ou de graphiques 


INTELLIGENCE ARTIFICIELLE 
SUR AMSTRAD CPC 
Langage et formes par T. et E. Levy-Abegnoli 


176 pages -198 FF Réf. SIP 16 
Ce livre aborde, avec humour, deux notions bien précises de l'In 
teligence Artificielle le langage naturel et la reconnaissance 
des formes Les dix logiciels Basic de ce livre tournent autour de 
ces deux thèmes Le dernier programme est un mini système 
expert de diagnostic médical Les programmes sont de diffi 
culté moyenne 


CLEFS POUR AMSTRAD 
Tome 1. Système de base par D. Martin 
184 pages - 140,00 FF Réf. SIP 17 


Pour accéder rapidement aujeu d'instruction duZ 80, aux points 
d'entrée des routines système, aux blocs de contrôle, à la struc 

ture interne _ et des conseils pour découvrir l'originalité de votre 
Amstrad 


Tome 2. Système disque por D. Martin 
et P. Jadoul 
232 pages -155,00 FF Réf. SIP 18 


Pour avoir sous les yeux les commandes, les points d'entrée des 
routines disque, les blocs de contrôle, la programmation et les 
brochages des circuits spécialisés et un chapitre complet sur le 
langage Logo distribué avec le système disque Vous trouverez 
aussi un recueil de “trucs” pour apprendre à transtérer des pro 
grammes de la cassette vers le disque, comment utiliser l'édi 
teur de secteur, etc 


Veuillez m'envoyer les ouvrages dont j'indique les titres ci-dessous. 
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L'OREILLE HARDIE sa PUCE SAVANTE UBRAIRIE MCHAUD GES PYRENEES 
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13100 AIX EN PROVENCE 16, rue Ancien Hôpital GES LYON 
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SHOP PHOTO 
33, rue Commandant Mouchotte 
75014 PARIS 


FNAC FORUM 
1, rue Pierre-Lescot 
75045 PARIS CEDEX 01 


UBRARIE EYROLLES 
61, Bd St Germain 
75240 PARIS CEDEX 05 


UBRARIE Re 
30, rue Saint-Sulpi 
75278 PARIS C DEX 06 


CMZEN BAND 
31, Bd de la Mame 
76000 ROUEN 


UBRARIE LESTRINGANT 
123, rue Ga Lederc 
76000 ROUEN 


ETS THOMAS 
MICRO-INFORMATIQUE 
153, av. de la Répubk 
78500 SARTROUVILL 


UBRARIE DELOCHE S.A 
21, rue de la 
82000 MONTAUBAN 


UBRARIE GAY 
4, place de la Liberté 
83000 TOULON 


UBRARE AMBLARD 
10-14, Portal Matheron 
84000 AVIGNON 


RC ELECTRONIC 

Mr MARTIN Robert 

53, rue Victor Hugo BP 12 
84100 ORANGE 

GIBERT J. LIBRAIRIE 

9, rue Gambetta 

86000 POITIERS 


MAJUSCULE POITOU 
3, bis rue de l'Eperon 
86000 POITIERS 


UBRANRE 

DE L'UNIVERSITE 

70, Rue Gambetta BP 109 
86003 POITIERS CEDEX 
UBRARIE BARADAT 


8, St Pierre 
87400 LIMOGES 


SDL 
25, route de Montargis 
89300 JOIGNY 


NIOCHAU-MARECHAL 
UBRARIE DU LYCEE 
100, Grande-Rue 
91160 LONGJUMEAU 


LCV 
130, rue de Corbed Vilemoisson s/Orge 
91360 EPINAY S/ORGE 


LOISITECH 
Centre Termina 93 
93106 MONTREUIL 


gs PLUS 
7, place Cameñnat 
93600 AULNAY S/BOIS 


BERTHET À SA 

UB. de la Grande Rue 

105, Grande Rue Ch. de Gaulle 
94130 NOGENT S/MARNE 


ORDIMIDUEL 

20, rue de Montreuil 

94300 VINCENNES 
LADNER S.A 

175, av. du Général Lederc 
94780 MAISON-ALFORT 


AVENA STE 
uare Cdombia 


w 
95021 CERGY CEDEX 
UBRNRE 


2, rue de Stalingrad 
95120 ERMON 


NOUVEAUTES 
+ port 10 % 


AMSTAR n° 1 épuisé 

[ Compilation CPC 1-2-3-4 

La pratique des imprimantes 

Michel ARCHAMBAULT 

Apprenez l'électronique sur AMSTRAD 

P. BEAUFILS & B. DESPERRIER ——— 
1 exemplaire AMSTAR n° 10F 


LIVRES 
+ port 10% 


[1 Mieux programmer AMSTRAD 85 F 
[ Communiquez avec AMSTRAD 

D. BONOMO - E. DUTERTRE 

Jouez avec AMSTRAD -— KERLOCH 
Programmes utilitaires pour AMSTRAD 
Michel ARCHAMBAULT 

L'Univers des PCW -— Patrick LEON 
Cassette 

Communiquez avec AMSTRAD 
Disquettes 

L'Univers du PCW -— Patrick LEON 
Communiquez avec Amstrad 


90 F 
48 F 


85F 
119 PF 


190 F 


150F 
250 F 


A:TOTAL 

B:PORT 10% 

À + B TOTAL GENERAL 
Franco de port 


Attention, n° 1 à 6, 12 et 14 épuisés 


8, 9,10, 11,13, 15, 16, 17, 

8, 19, 20, 21,22 

7, 

Hors série n° 1 avec cassette 


Adresse : 


Code postal : 


Date : 


Merci d'écrire en majuscules. 


REPORT TOTAL GENERAL A + B 


13F 
15F 
15F 


[ Hors série n° 2 sans cassette 

Hors série n° 3 sans cassette 

Hors série n° 4 

Entourez le (ou les) numéro(s) commandé(s). 


CASSETTES 
Franco de port 


Cassettes n° 1, 2, 14, 17 épuisées : 
1 cassette représente un numéro 
D abonné ‘ 

© non abonné 

Ü abonnement cassettes (11 n°) 

Je commande les cassettes n° 


DISQUETTES 
Franco de port 


1 disquette contient 2 n° consécutifs de CPC 
— Disquette n° 1 comprend CPC 1 et 2 

— Disquette n° 2 comprend CPC 3 et 4 

— Disquette n° 3 comprend CPC 5 et 6 

— Disquette n° 4 comprend CPC 7 et 8 

— Disquette n° 5 comprend CPC 9 et 10 

— Disquette n° 6 comprend CPC 11 et 12 
— Disquette n° 7 comprend CPC 13 et 14 
— Disquette n° 8 comprend CPC 15 et 16 
— Disquette n° 9 comprend CPC 17 et 18 
— Disquette n° 10 comprend CPC 19 et 20 
— Disquette n° 11 comprend CPC 21 et 22 
— Disquette n° 1 HS comprend CPC 1 HS 
— Disquette n° 2 HS comprend CPC 2HS 
— Disquette n° 3 HS comprend CPC 3HS 
— Disquette n° 4 HS comprend CPC 4HS 
QD abonné 

non abonné 

abonnement disquettes (6) 

Je commande les disquettes n° 


45 F 
55 F 
450 F 


110F 
140 F 
600 F 


TOTAL GENERAL FRANCO 
Port en sus 10 % pour envois par avion 


Prénom : 


Ville : 


Signature : 


Ci-joint un chèque libellé à l'ordre de : Editions SORACOM. Retournez le(s) bulletin(s) ou uñe photocopie à : Editions SORA- 


COM - La Haie de Pan - 35170 BRUZ. 


Lo 


SONDAGE MENSUEL 
CPC n° 23 


Pour nous aider à mieux cerner vos désirs, remplissez le dos de ce bulletin, découpez-le et retournez-le à 
l'adresse suivante : 
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il 
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Ë 
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Editions SORACOM 3 
SONDAGE MENSUEL CPC 

La Haie de Pan E 

35170 BRUZ f 

ë 
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ë 
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Inscrivez vos remarques et suggestions ci-dessous : 


Matériel utilisé : 


# (facultatif) NON ge. ter, Prenom: 


fl Adresse : ; 
x e Hs FE : Se $ & 
EL 


Cet ouvrage réalisé 

dans un style très A Line 

clair apprendra aux À ANR a De nombreux 
amateurs comme aux D a \ programmes de jeux 
professionnels à à Ê et utilitaires, des 
résoudre les mille et D f \ | conseils pratiques, 
un problèmes qu'ils (e | trucs et astuces, 


ne manqueront pas à SE | schémas, des 4 

de rencontrer lors de EE J:\ premiers n° de CPC 
la mise en œuvre de À ce” réunis en un seul 
leur imprimante. ANT um livre. 


Ci-joint un chèque libellé à l'ordre de : BRETAGNE EDIT PRESSE. Retournez le(s) bulletin(s) ou une photocopie à : BRETAGNE EDIT' 
PRESSE - La Haie de Pan — 35170 BRUZ 


PCM EE 


Notez les articles de ce numéro selon les critères suivants : 


Ë Ë 

| 0 : ne me concerne pas 1 : ne m'a pas intéressé L 

H 2 : intérêt moyen 3 : intéressant 

E 4 : très intéressant 5 : passionnant à 

- OPINION GLOBALE SUR CE NUMERO : - 

E CAO sur CPC Photo-Sprite E 
Tout sur sound Relief 

D Fractales en LOGO Trucs et astuces ( 

E Port E/S économique Initiation à CP/M H 
3D Snake EE Moniteur - Assembleur 0 

il Octode Restauration de la mémoire BASIC h 

E RSX CHAR Essais logiciels O E 
Bug où es-tu ? Essais matériels 

m Branchez le turbo fl 


OR EEELLELELLLELELELEEEEE 


nee ee 


PARTICIPEZ A CPC ! 


Remplissez soigneusement ce coupon et joignez-le à votre programme, Sur cassette ou sur disquette. Envoyez le tout à : 


CPC 

La Haie de Pan 

35170 BRUZ 
Le programmeur : 
Nom : Prénom : Age : 
Adresse complète : 
Le programme : ; 
Nom : Catégorie : [] Jeu [1 Utilitaire [) Educatif 
Taille : Périphériques utilisés : 
Support : 
Compatibilité (testée) avec : 464 [] 664 6128 [] PCW 8256 

[] PC 1512 PCW 8512 


Attestation sur l'honneur 
Je soussigné, , déclare être l’auteur du programme ci-joint et ne l'avoir jamais proposé 
à une autre revue. 


Le : 1 7 à : 


Signature : 


PETI 
ANNONCES 


TES 


La place réservée aux petites annonces est 
limitée. En conséquence, celles-ci passent 
dans leur ordre d'arrivée. Par contre, les peti- 
tes annonces farfelues sont systématique- 
ment rejetées. De même, comme il est peu 
probable qu'il existe des ‘’généreux dona- 
teurs’’ de matériels ou de logiciels, les peti- 
tes annonces faisant appel à ces philantro- 
pes ne seront insérées que si la place libre 
le permet. 

Seront refusées toutes les annonces visant 
à vendre ou échanger des listes ou copies de 
logiciels non garantis ‘‘d’origine’’, ainsi que 
toute annonce incitant au piratage. 

En conséquence, réfléchissez bien avant 
d'envoyer vos textes. 

Les petites annonces doivent impérativement 
nous parvenir sur la grille (découpée ou pho- 
tocopiée), le texte étant rédigé à raison d'un 
caractère par case. 

Enfin, toute annonce non accompagnée de 
timbres ne sera pas insérée. 


Vends CPC 664 mono + lecteur 3, 5 p. + lect. K7 
+ imprimante NEC 8023 + meule informatique 
+ logiciels. Gottmann, (1) 43.63.19.40, après 
20h. 


Vends Commodore C64-Magnet + aliment. 
+ 2 K7B. Lee, Ghostbusters, 1 500 F. Mile Ban- 
tegnie M., 19, r. Fleurus, Lille, préc. tél. pr contact. 


Vends Amstrad 464 coul., sous garantie, acheté 
le 18.10.86 + joystick + 40 jeux environ 
+ revues, prix 2 900 F à déb. Tél. 39.57.30.62 
(ap. 18 h), dép. 78500. 


LS 

Vends CPC 464 coul. + joystick + housse 
+ 5 K7 vier. + 10 K7 jeux + 3 K7 util. d + 1t. 
texte, 2 000. Tél. 44.58.64.18, après 16h. 


Vends Amstrad CPC 664 monochrome, très bon 
état, 2 500 F. Tél. 46.54.00.77, après 20 h. 


Des sons puissants en Hi-Fi pr ts Amstr., 235 F, 
logic. spéciaux Okimate 20, 120 F. E/R Minitel loc. 
et dist. Tél. 90.55.91.56 pr doc. 


Vends synthétiseur vocal TMPI (français), 200 F, 


débattable. Henri au 60.02.28.33, (Lesigny 77). 


Amstrad PCW 8512 et CPC 6128 cherchent con- 
tacts. Magnac BP 04, 33240 Saint-André-de- 


Cubzac. Tél. 57.43.18.21, le soir. 


Vends disks origin. + notic. (livres) dBase Il 
+ génér. d'applic., 700 F, Xéno, 80F, Trivial 
purs., 120F, AMX fonction, 100F. Tél. 
21.28.68.69. 


Vends Amstrad CPC 464, couleur + joystick 
+ crayon optique + logiciels originaux et autres 
(beaucoup), 2 700 F. Thierry, 56.50.80.94. 


Cherche CPC 6128 sans moniteur en Ille et Vilaine, 
prix intéressant. Tél. 99.99.23.45. 


Vends CPC 6128 coul. + 200 logiciels + lecteur 
5" 1/4 + disks vierges + livres + revues + 1 
joystick + magnéto cassette. Tél. 30.74.17.43, 


Vends Grafpad 2, jan. 87, cause d. emp., 800 F 
+ PTT, ne fonctionne pas s. imp. SP 1000. A. 
Demangeat, Courtenay 45. Tél. 38.97.92.14, 
€, ÿs 


Cherche clavier UC pour TRS 80 + FDI1 pour Ams- 
trad. J.C.L., 7, rue Clovis, 75005 Paris, (1) 
69.42.87.28. 


Informatique en juillet pour enfants 6 à13 ans, colo- 
nie de vacances. J.C.L., (1) 69.42.87.28, 7, rue 
Clovis 75005 Paris. 


Vends Atari 800XL, 64 k + 5 cartouches de jeux 
+ lect. enr. de cassettes, acheté 4 200 F env., 
vendu 3 000F. Tél. 96.45.21.57, (+ livre 
+ manuel). 


Achète CPC 464 de préférence HS, avec ou sans 
moniteur. Pascal Duclos, 32, av. des Fleurs, 32800 
Eauze. 


Vends CPC 464 mono. + 30 logiciels + 1 joys- 
tick + revues, prix neuf 2700 F, cédé à 1700 F. 
Tél. 40.89.96.18. 


Vends ZX Spectrum + 48K + péritel + impri- 


mante SEI KOSHA GP-50S (état neuf) + 12 


jeux + livre, 2000 F. Tél. 39.73.87.95, après 18h. 


Vends jeux, K7 et disks originaux (K7 à partir de 
60 F et disk, 90 F). Emmanuel au 94.89.28.08 à 
partir de 17h. 


Vends MP1 jamais servi, TBE, prix 300 F + port. 
Le week-end, tél. 53.82.21.30. 


Vends 6128 mono. + magnéto + 350 jeux + 50 
disc + modem DTL 2100 + logiciels + livres + 
câble minitel Amstrad. Tél. 20.93.67.24. 


Vends originaux K7 et disks moitié prix et 30 % sur 
livres. Cotte Christophe, La Res du Parc, Les Noi- 
setiers, 38430 Moirans. 


Vends TO7 70 clavier mécanique + lect. K7 + 2 
joysticks avec ext. cartouches Basic polyphonia + 
K7, le tout 3500 F. Tél. 34.68.73.11. 


Vends 5 K7 originales 200F : Sapiens, Bruce Lee, 
Sorcery, Raid, Yie Ar Kung Fu. Tél. 39.89.88.82 
(Saint-Gratien), demander Christophe. 


Vends imprimante Seikosh à GP100A, TBE, 
1000 F. Tél. 99.31.22.72, l'après-midi ; 
99.31.25.24, après 18h. 


Vends imprimante GP550A, TBE, prix à débattre. 
Tél. 1.64.90.16.75, après 20h. 


Vends jeux originaux et cherche joystick Amstrad 
{(1Y1). Téléphoner au 96.79.05.43 (Olivier). 


Vends K7 originales Badmax + Le Million + Star- 
glider, le tout : 380 F ou vente séparée. Tél. 
27.32.05.76. 


Vends Amstrad CPC 6128 couleur + 2 manettes 
jeu + 5 jeux, le tout : acheté 4650 F janvier 87 
sous garantie, vendu 4050 F. Tél. 
16.1.43.26.48.04. 


Vends lecteur de disquettes DDI-1, état neuf, peu 
servi, garantie du 7/86 + 10 disquettes vierges + 
logs, 1700 F. Tél. 44.58.64.18. 


Vends CPC 464 moniteur Monoch + extension 
mémoire 64K Dktronics, 1800 F. Tél. 
38.88.87.25, après 18h30. 


Gagnez du temps ! Sur Minitel 36.15, tapez MHZ 
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Transfère tous fichiers ASCII et prog. dBase Multi- 
plan Basic Pascal sur disq. SP MSDOS SOF/disq. 
F.P. Langlois, 10, rue H.-Becquerel, 60100 Creil. 


Cherche contact et ou renseignements pour gére! 
un train électrique par CPC 6128. Soubiran, 9, rue 
de l’Arsenal, 33000 Bordeaux. 


Echange Echosoft valeur 395 F disk contre 
synthèse vocale français + 100 F et de nombreux 
logiciels cadeaux XJ-P Spiter. Tél. 1.42.83.39.40. 


Alsace vends CPC 464 couleur, 2200 F. Tél. 
88.74.38.52, après 19h. 


Cause double emploi, vends pr CPC Calculmat, 
200 F ; jeux échec 3D Voice Chess, 75 F ; multi- 
gestion, 95 F. Tél. 69.05.75.08 (Viry-Chat, 91). 


Vends nombreuses revues et jeux sur cassette à 
moitié prix, liste contre timbre. Ancenay Fabien 
13, rue de Nazareth, 69003 Lyon. 


Vends CPC 464 mono + joystick + 5 cass. + 
livres + cadeau 2 disquettes, état neuf, 1590 F. 
Tél. 1.64.93.34.74. 


Vends Amstrad 664 couleur, exc. état, 2500 F. 
Tél. 47.83.95.22. 


Vends ou échange disc Originaux Superpaint 
Orphée Sorcery + Salut lartiste, Sold a millioni, etc. 
Tél.42.07.14.75 (CRETEIL 94). 


Cherche Drive DD1 (complet drlogo, etc.) pour - de 
1000 F (1200 F maxi). 
Vends imp. Okimater20, 
46.30.71.28, après 18h. 


1400 F. Tél. 


Vends VE5000 + interface + 1 manette + cor- 
don magneto + 5 logiciels + 3 livres ; le tout : 
1500 F (idéal pour débutants). Tél. 53.80.28.93. 


Vends CPC 6128 mono (01.8 6) + support écran 
tournant + table + 3 joysticks + 80 logiciels et 
utilitaires, 3400 F. Tél. 60.16.68.45. 


Vends imprimante TRS-80 CGP-1154 couleurs, 
1700 F ou échange contre lect 5 1/4 pour Ams- 
trad. Tél. 20.54.18.25, après 17h. 


Vends RAM 256K, vortex, pour CPC 464, sous 
garantie, achat janv. 87, 800 F (990 F neuf). BEAU- 
TORD 2, tél. 23.56.38.87, après 18h. 


Pour CPC 6128, cherche tous programmes sur 
électronique et électricité. Faire offre à ROUX D. 
3,rue du Pont, 13400 AUBAGNE. 


Echange Synthe. vocal français + 150 program- 
mes contre graphiscop Il. Tél. 61.76.23.37. 


Vends CPC 464 couleur + DDIT + environ 110 
programmes sur K7 et disque + NB magazines, le 
tout : 4000 F. Tél. 27.61.67.98 (besoin urgent). 


Cherche contact pour former Club informatique et 
électronique sur Lyon. ROLLET, 16, chemin des 
Petites-Brosses, 69300 CALUIRE. 


664 + mercitel + modem cherche correspondant 
+ programme de communication pour élaborer 
nom serveur monovoie, Walch JL 68520 
BURMHAUTPT-LE-BAS. 


Stop affaire ! Vends OK IMATE20 pour CPC + 
câble + 3 têtes + hardcopy (sous garantie), le 
tout : 2100 F. Tél. 48.24.22.96, Lionel. 


Recherche moniteur couleur pour CPC 464. Vends 
moniteur monochrome pour CPC. Tél. 
33.37.00.60, le matin. 


Vends CPC 464 couleur + ext MEM 64K Phoenix 
+ crayon optique + trucs et astuces + câble hi- 
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fi, 3000 F. Tél. 35.31.65.16, après 18h. 


Echange ou vends logiciels PCW (jeux et utilitaires 
DBII, Multiplan, etc.), Caboche magasin Cendry, 9, 
rue Abbé-Derry, 94400 VITRY/SEINE, tél. 
46.80.20.62 et 46.70.83.06. 


Urgent, cherche photocopie de Cherry Paint des 
n° 5, 14, 19. M. PACHY, allée André-Chenier, 
78260 ACHERES. 


Echange moniteur mono + 200 F + K7 (jeux et 
utilitaires) contre moniteur couleur CPC 6128. Tél. 
33.26.42.92, après 8 h, ALENÇON. 


Echange moniteur monochrome 6T65 Amstrad 
(sous garantie) + logiciel ou 300 F contre moni- 
teur couleur CPC 6128. Tél. 33.28.14.74, ORNE. 


Vends tout ! 464 mono à 1500 F + DD1 + Ext. 
64K DKTRON + impr. GP50 (600 F) + program- 
mes originaux + notices + livres séparément. Tél. 
1.43.38.62.71. 


Vends CPC 464 mono + péri. couleur + 100 jeux, 
1800 F et DDI1, 1500 F et VIC20 + péri. couleur 
+ livre + 1 cartouche, 800 F. Tél. 77.65.24.44, 


R.electronique 


62 RUE DU GI DE GAULLE 
94438 CHENNEVIERES / M 
(16,1) 45,76,73,13 


le Specialiste AMSTRAD 
ET COMPATIBLES PC 


Vends logiciel Hercule 240 F (jamais utilisé). Guy 
Griebel, 33, rue de Lobsann, 67250 Merkwiller, tél. 
88.80.78.02, week-end. 


Vends CPC 664 + DMP 2000 (sous garantie 


FNAC) + stylo optique + livres + revues 
+ accessoires, 5 500F. Axel Petersen, 
45.32.73.38. 


Astuces, faites durer votre ruban d'imprimante 
5 fois plus longtemps. Pour rens. env. contre envel 
timbrée : E. E. BP 37, 14290 Orbec. 


Recherche cassette ‘’Tyran'’ pour CPC 464, origi- 
nal et bon état, merci. Ecrire E. Bardoux, 17, av. 
Henri Barbusse, 94400 Vitry s.-s. 


Vends Amstrad 664 avec moniteur couleur, état 
neuf + 6 disquettes vierge, 3 500 francs port 
compris. 31.98.48.93. 


Cherche pour CPC 6128 plans + descriptif 
système duplication Eprom 2764. Régis JN, 17, rue 
du Chenet, 25230 Dasle. Tél. 81.34.45.05. 


PETI 
ANNONCES 


TES 


Vends 6128 couleur + joystick + 300 jeux 
+ disc vierges + 100 utilitaires + livre + revues, 
prix 4 500. Tél. 47.09.08.10, après 18 h, Olivier. 


Vends imprimante DMP1 + 35 jeux dont (Combat 
Lynx...) + joystick Quinshoot Il + nombreux 
livres, le tout 2 000 F. Tél. 45.42.92.60. 


Achète lecteur DDI 1 + 1 ou 2 disks vierges, prix 
à débattre. Tél. 35.29.53.17, après 17 h 30, Yan- 
nick Castagnet, 22, rue Froide, 76400 Fecamp. 


Vends Amstrad CPC 464 + moniteur couleur 
+ 30 jeux + toutes les revues Amstrad magazine, 
le tout pour 2 500 F. Tél. 57.43.17.73. 


Vends 464 coul. + DDI + jeux sur cassettes et 
disquettes, le tout en excellent état, pour 3 700 F. 
Jan-Christophe, tél. 43.65.72.10. 


Vends nombreuses revues Amstrad (dont épui- 
sées), livres, etc. Possibilité d'échanges ! J.-C. 
Landry, 7, place Rivet, 38000 Grenoble. 


Vends CPC 464 mono + DD1 + traitement texte 
+ de/assemble Dams + Turbo Pascal + Turbo 
Tutor, val. 6 200 F + 720 K, jeu vendu 3 200 F. 
48.58.64.84. 4 à 


Echange 2nd Drive 6128 & 664, contre DMP 2000 
ou équivalente. Tél. 64.94.85.93, après 17h. 


Vends CPC 464 couleur + livres + nombreux 
jeux, 2 400 F. Tél. 29.84.14.36. 


Vends CPC 464 mono + joystick + livres + K7 
comme neuf, 1 600 F. Tél. (1) 64.93.34.74, après 
19h. 


Vends 464 couleur + joystick + 12 jx + CAO 
+ Amsword, état neuf, très peu servi, px 2 600 F. 
Tél. (1) 45.58.40.03, ap. 18h. 


Vends Dart Scanner Digitaliseur pour Amstrad 
+ DMP 2000, prix 650 F. Tél. 39.71.62.96, 
demander Thierry (le soir). 


Vends K7 de jeux (Million III, Crafton & Xunk, Spin- 
dizzy, Warrior, Equinox, Zoïds, Who dares wins Il, 
3 weeks, paradise...). Tél. 29.39.39.03, après 
19h. 


Vends PCW 8256, 512K + 20 disks 3° 
+ interface minitel + logiciel + livres pour 
3 750 F. Tél. 81.34.40.28. 


Vends 464 coul. + DD1 + imprimante GLP3101 
+ jeux + utilitaire + livres, prix 6 500 F. Tél. 
71.05.50.51, hres repas. 


Vends cause double ass. des mon. neuf ‘'DAMS"", 
250 F ou échan. contre 2 log. jeux disc 6128. Tél. 
92.89.11.58, David entre 10 et 13h. 


Echange prgs basic Tapes en état de marche de 
CPC contre ceux d'Asmtar sur K7 ou disK. Espi- 
nasse, 196, rue Beauregard, 73000 Chambery. 


Vends Masterfile 664 (original), 200 F et cherche 
contact sur 664. Ecrire à : Noël Fabrice, 14, rue des 
Fauvettes, 62300 Lens. 


Recherche Amstradistes Berruyiers pour créer club. 
Ecrire à Vincent Goblet, 10 A, rue Erick Labonne, 
18000 Bourges. 


Cherche version 6128 de L'apprenti sorcier 
+ Diamants île maudite. Régis JN, 17, rue du Che- 
nêt, 25230 Dasle. Tél. 81.34.45.065. 


Vends 90 disquettes 3 pouces contenant environ 
450 softs d'une valeur de 80 000 F, vendues au 
plus offrant. Possibilité d'échange contre périphé- 
rique ou vente à l'unité, très intéressant. Tél. (1) 
60.78.51.07, le lundi ou après 20h. 
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chel Archambault 


loriciels 


Ne 


DISTRIBUES PAR 
LORICIELS | 
81, RUE DE LA PROCESSION | Er SR " 
PRES L a are. à 


92500 RUEIL 
TÉL.:(1)47521818-TELEX631748F 


| 


Utilisez à fond toutes les possibilités de votre 


AMSTRAD 


OFFRE SPÉCIALE DE SOUSCRIPTION 
jusqu’au 30 juin 1987 


379 


seulement au lieu de 450F, 
soit 17 % d'économies 


4 BONNES RAISONS 
DE COMMANDER 
MAINTENANT 


LA GARANTIE WEKA : 
SATISFAIT OU REMBOURSÉ 


e 1-“Comment exploiter toutes les ressources et augmenter les 
performances de votre Amstrad CPC 464 / 664 / 6128” bénéficie de 
la formule WEKA : “satisfait ou remboursé”. Cette possibilité vous 
est garantie pour un délai de 15 jours à partir de la réception de 
l'ouvrage. Si au vu de votre ouvrage, vous estimez qu’il ne 
correspond pas complètement à votre attente, vous conservez la 


e Vous bénéficiez 


d’une réduction 
de 75F, soit 17% d'économies. 


e Vous utiliserez à fond 
toutes les possibilités de votre Amstrad. 


possibilité de le retourner aux Editions WEKA et d’être alors 
intégralement remboursé. 

e 2-La même garantie vous est consentie pour les envois de 
compléments et mises à jour. Vous pouvez les interrompre à tous 
moments, sur simple demande écrite ou retourner toute mise à jour 
ou complément qui ne vous satisferait pas dans un délai de 15 jours 
après réception. 


e Vous serez régulièrement 
tenu au courant des nouveautés. 


e Vous êtes couvert par 
la garantie “Satisfait ou Remboursé”. 


COMMENT 
EXPLOITER TOUTES 
LES RESSOURCES 
ET AUGMENTER LES 
PERFORMANCES DE 
VOTRE AMSTRAD 
CPC 464/664/6128 


BON DE COMMANDE PRIVILÉGIÉ 


à retourner dès aujourd’hui sous enveloppe non affranchie aux 
EDITIONS WEKA - libres-réponses n°2581- 75 75581 PARIS Cedex 12 


OUI, je souhaite profiter avant le 30 juin 1987 de votre prix spécial de 
souscription et je vous demande de m'envoyer, dès sa parution, l'ouvrage 
“Comment exploiter toutes les ressources et augmenter les performances 
de votre Amstrad CPC 464 / 664 / 6128”. 

(Un classeur à feuillet mobiles, grand format 21 x 29,7 cm, 400 pages. Mise 
à jour : 150 pages 215F TTC, service annulable sur simple demande.) 
375F TTC* au lieu de 450F TTC (offre valable jusqu’au 30 juin 1987). 


Veuillez trouver ci-joint le règlement de 375F TTC*, correspondant au 
montant de ma souscription. 


NOM 
PRENOM 
ADRESSE 
CODE POSTAL 
VILLE 
Téléphone 
Date Signature t 
erdez PA ee. 30 juin b 
Suscription S'Onvoyez VONT me 
SP emplissez L . ee ’ 
a ègle 
Demandez votre exemplaire de are 2 réaliser 
aujourd’hui-même. deco ainsi GS % 
vou no de 17 


* Prix port inclus, valable jusqu’au 
30 juin 1987. CPC 732203 


